aboutsummaryrefslogtreecommitdiff
path: root/modules/vim/vim.dot.link/snippets/perl.snippets
diff options
context:
space:
mode:
authorSilvio Rhatto <rhatto@riseup.net>2013-12-27 15:36:29 -0200
committerSilvio Rhatto <rhatto@riseup.net>2013-12-27 15:36:29 -0200
commite573a7090239d4b5cdc0e2e1053433f6341fdba2 (patch)
treee53f5164bb3c37dcf8d2959e06b6e2b722170af0 /modules/vim/vim.dot.link/snippets/perl.snippets
parentadce46f27ce9cd659581153ed7264dbabdc06c19 (diff)
downloaddotfiles-e573a7090239d4b5cdc0e2e1053433f6341fdba2.tar.gz
dotfiles-e573a7090239d4b5cdc0e2e1053433f6341fdba2.tar.bz2
Removing vim to convert it to a submodule
Diffstat (limited to 'modules/vim/vim.dot.link/snippets/perl.snippets')
-rw-r--r--modules/vim/vim.dot.link/snippets/perl.snippets91
1 files changed, 0 insertions, 91 deletions
diff --git a/modules/vim/vim.dot.link/snippets/perl.snippets b/modules/vim/vim.dot.link/snippets/perl.snippets
deleted file mode 100644
index cf8f9fc..0000000
--- a/modules/vim/vim.dot.link/snippets/perl.snippets
+++ /dev/null
@@ -1,91 +0,0 @@
-# #!/usr/bin/perl
-snippet #!
- #!/usr/bin/perl
-
-# Hash Pointer
-snippet .
- =>
-# Function
-snippet sub
- sub ${1:function_name} {
- ${2:#body ...}
- }
-# Conditional
-snippet if
- if (${1}) {
- ${2:# body...}
- }
-# Conditional if..else
-snippet ife
- if (${1}) {
- ${2:# body...}
- } else {
- ${3:# else...}
- }
-# Conditional if..elsif..else
-snippet ifee
- if (${1}) {
- ${2:# body...}
- } elsif (${3}) {
- ${4:# elsif...}
- } else {
- ${5:# else...}
- }
-# Conditional One-line
-snippet xif
- ${1:expression} if ${2:condition};${3}
-# Unless conditional
-snippet unless
- unless (${1}) {
- ${2:# body...}
- }
-# Unless conditional One-line
-snippet xunless
- ${1:expression} unless ${2:condition};${3}
-# Try/Except
-snippet eval
- eval {
- ${1:# do something risky...}
- };
- if ($@) {
- ${2:# handle failure...}
- }
-# While Loop
-snippet wh
- while (${1}) {
- ${2:# body...}
- }
-# While Loop One-line
-snippet xwh
- ${1:expression} while ${2:condition};${3}
-# For Loop
-snippet for
- for (my $${2:var} = 0; $$2 < ${1:count}; $$2${3:++}) {
- ${4:# body...}
- }
-# Foreach Loop
-snippet fore
- foreach my $${1:x} (@${2:array}) {
- ${3:# body...}
- }
-# Foreach Loop One-line
-snippet xfore
- ${1:expression} foreach @${2:array};${3}
-# Package
-snippet cl
- package ${1:ClassName};
-
- use base qw(${2:ParentClass});
-
- sub new {
- my $class = shift;
- $class = ref $class if ref $class;
- my $self = bless {}, $class;
- $self;
- }
-
- 1;${3}
-# Read File
-snippet slurp
- my $${1:var};
- { local $/ = undef; local *FILE; open FILE, "<${2:file}"; $$1 = <FILE>; close FILE }${3}