Last commit before tagging and releasing

extras/imported/perl-mode/Conditional if..else (ife).yasnippet

@@ -0,0 +1,10 @@
+# -*- mode: snippet -*-
+# key: ife
+# contributor: Translated from TextMate Snippet
+# name: Conditional if..else
+# --
+if ($1) {
+	${2:# body...}
+} else {
+	${3:# else...}
+}

extras/imported/perl-mode/Conditional if..elsif..else (ifee).yasnippet

@@ -0,0 +1,12 @@
+# -*- mode: snippet -*-
+# key: ifee
+# contributor: Translated from TextMate Snippet
+# name: Conditional if..elsif..else
+# --
+if ($1) {
+	${2:# body...}
+} elsif ($3) {
+	${4:# elsif...}
+} else {
+	${5:# else...}
+}

extras/imported/perl-mode/Conditional one-line (unless).yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: xunless
+# contributor: Translated from TextMate Snippet
+# name: Conditional One-line
+# --
+${1:expression} unless ${2:condition};

extras/imported/perl-mode/Conditional one-line (xif).yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: xif
+# contributor: Translated from TextMate Snippet
+# name: Conditional One-line
+# --
+${1:expression} if ${2:condition};

extras/imported/perl-mode/Function (sub).yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: sub
+# contributor: Translated from TextMate Snippet
+# name: Function
+# --
+sub ${1:function_name} {
+	${2:# body...}
+}

extras/imported/perl-mode/Loop one-line (xforeach).yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: xfore
+# contributor: Translated from TextMate Snippet
+# name: Loop One-line
+# --
+${1:expression} foreach @${2:array};

extras/imported/perl-mode/Loop one-line (xwhile).yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: xwhile
+# contributor: Translated from TextMate Snippet
+# name: Loop One-line
+# --
+${1:expression} while ${2:condition};

extras/imported/perl-mode/Test.yasnippet

@@ -0,0 +1,12 @@
+# -*- mode: snippet -*-
+# key: test
+# contributor: Translated from TextMate Snippet
+# name: Test
+# --
+#!/usr/bin/perl -w
+
+use strict;
+use Test::More tests => ${1:1};
+use ${2:ModuleName};
+
+ok(${3:assertion});

extras/imported/perl-mode/class.yasnippet

@@ -0,0 +1,17 @@
+# -*- mode: snippet -*-
+# key: class
+# contributor: Translated from TextMate Snippet
+# name: Package
+# --
+package ${1:ClassName};
+
+${2:use base qw(${3:ParentClass});
+
+}sub new {
+	my \$class = shift;
+	\$class = ref \$class if ref \$class;
+	my \$self = bless {}, \$class;
+	\$self;
+}
+
+1;

extras/imported/perl-mode/eval.yasnippet

@@ -0,0 +1,11 @@
+# -*- mode: snippet -*-
+# key: eval
+# contributor: Translated from TextMate Snippet
+# name: Try/Except
+# --
+eval {
+	${1:# do something risky...}
+};
+if (\$@) {
+	${2:# handle failure...}
+}

extras/imported/perl-mode/for.yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: for
+# contributor: Translated from TextMate Snippet
+# name: Loop
+# --
+for (my \$${1:var} = 0; \$$1 < ${2:expression}; \$$1++) {
+	${3:# body...}
+}

extras/imported/perl-mode/foreach.yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: fore
+# contributor: Translated from TextMate Snippet
+# name: Loop
+# --
+foreach ${1:my \$${2:x}} (@${3:array}) {
+	${4:# body...}
+}

extras/imported/perl-mode/hash pointer.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# contributor: Translated from TextMate Snippet
+# name: Hash Pointer
+# binding: "^l"
+# --
+ => 

extras/imported/perl-mode/if.yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: if
+# contributor: Translated from TextMate Snippet
+# name: Conditional
+# --
+if ($1) {
+	${2:# body...}
+}

extras/imported/perl-mode/slurp.yasnippet

@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# key: slurp
+# contributor: Translated from TextMate Snippet
+# name: Read File
+# --
+my \$${1:var};
+{ local \$/ = undef; local *FILE; open FILE, "<${2:file}"; \$$1 = <FILE>; close FILE }

extras/imported/perl-mode/unless.yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: unless
+# contributor: Translated from TextMate Snippet
+# name: Conditional
+# --
+unless ($1) {
+	${2:# body...}
+}

extras/imported/perl-mode/while.yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: while
+# contributor: Translated from TextMate Snippet
+# name: Loop
+# --
+while ($1) {
+	${2:# body...}
+}