Updated plugins

sources_non_forked/vim-snippets/snippets/perl.snippets

@@ -8,31 +8,35 @@ snippet .
 # Function
 snippet sub
 	sub ${1:function_name} {
-		${2:#body ...}
+		${2}
 	}
 # Conditional
 snippet if
 	if (${1}) {
-		${2:# body...}
+		${2}
 	}
 # Conditional if..else
 snippet ife
 	if (${1}) {
-		${2:# body...}
+		${2}
 	}
 	else {
-		${3:# else...}
+		${3}
 	}
 # Conditional if..elsif..else
 snippet ifee
 	if (${1}) {
-		${2:# body...}
+		${2}
 	}
 	elsif (${3}) {
 		${4:# elsif...}
 	}
 	else {
-		${5:# else...}
+		${5}
+	}
+snippet eif
+	elsif (${1}) {
+		${2}
 	}
 # Conditional One-line
 snippet xif
@@ -40,7 +44,7 @@ snippet xif
 # Unless conditional
 snippet unless
 	unless (${1}) {
-		${2:# body...}
+		${2}
 	}
 # Unless conditional One-line
 snippet xunless
@@ -57,7 +61,7 @@ snippet eval
 # While Loop
 snippet wh
 	while (${1}) {
-		${2:# body...}
+		${2}
 	}
 # While Loop One-line
 snippet xwh
@@ -65,7 +69,7 @@ snippet xwh
 # C-style For Loop
 snippet cfor
 	for (my $${2:var} = 0; $$2 < ${1:count}; $$2${3:++}) {
-		${4:# body...}
+		${4}
 	}
 # For loop one-line
 snippet xfor
@@ -73,14 +77,14 @@ snippet xfor
 # Foreach Loop
 snippet for
 	foreach my $${1:x} (@${2:array}) {
-		${3:# body...}
+		${3}
 	}
 # Foreach Loop One-line
 snippet fore
 	${1:expression} foreach @${2:array};${3}
 # Package
 snippet package
-	package ${1:`substitute(Filename('', 'Page Title'), '^.', '\u&', '')`};
+	package ${1:`substitute(vim_snippets#Filename('', 'Page Title'), '^.', '\u&', '')`};
 
 	${2}
 
@@ -89,7 +93,7 @@ snippet package
 	__END__
 # Package syntax perl >= 5.14
 snippet packagev514
-	package ${1:`substitute(Filename('', 'Page Title'), '^.', '\u&', '')`} ${2:0.99};
+	package ${1:`substitute(vim_snippets#Filename('', 'Page Title'), '^.', '\u&', '')`} ${2:0.99};
 
 	${3}
 
@@ -127,7 +131,7 @@ snippet switch
 # Anonymous subroutine
 snippet asub
 	sub {
-	 	${1:# body }
+		${1}
 	}
 
 
@@ -135,7 +139,7 @@ snippet asub
 # Begin block
 snippet begin
 	BEGIN {
-		${1:# begin body}
+		${1}
 	}
 
 # call package function with some parameter
@@ -174,7 +178,7 @@ snippet given
 # switch-like case
 snippet when
 	when (${1:case}) {
-		${2:# body}
+		${2}
 	}
 
 # hash slice
@@ -237,7 +241,7 @@ snippet subpod
 	=cut
 
 	sub ${1:subroutine_name} {
-		${2:# body...}
+		${2}
 	}
 # Subroutine signature
 snippet parg
@@ -318,7 +322,7 @@ snippet trunner
 snippet tsub
 	sub t${1:number}_${2:test_case} :Test(${3:num_of_tests}) {
 		my $self = shift;
-		${4:#  body}
+		${4}
 
 	}
 
@@ -326,14 +330,14 @@ snippet tsub
 snippet trsub
 	test ${1:test_name} => { description => '${2:Description of test.}'} => sub {
 		my ($self) = @_;
-		${3:# test code}
+		${3}
 	};
 
 #prep test method
 snippet tprep
 	sub prep${1:number}_${2:test_case} :Test(startup) {
 		my $self = shift;
-		${4:#  body}
+		${4}
 	}
 
 # cause failures to print stack trace