[Perl] Refactor whole syntax definition to drop Oniguruma (sublimehq#…

…1564)

Perl/Snippets/if.sublime-snippet → Perl/Snippets/Conditional-if-(if).sublime-snippet

@@ -5,5 +5,5 @@
 ]]></content>
 	<tabTrigger>if</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Conditional</description>
+	<description>if.. Conditional</description>
 </snippet>

Perl/Snippets/Conditional-if..else-(ife).sublime-snippet

@@ -7,5 +7,5 @@
 ]]></content>
 	<tabTrigger>ife</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Conditional if..else</description>
+	<description>if..else.. Conditional</description>
 </snippet>

Perl/Snippets/Conditional-if..elsif..else-(ifee).sublime-snippet

@@ -9,5 +9,5 @@
 ]]></content>
 	<tabTrigger>ifee</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Conditional if..elsif..else</description>
+	<description>if..elsif..else.. Conditional</description>
 </snippet>

Perl/Snippets/Conditional-one-line-(xif).sublime-snippet

@@ -3,5 +3,5 @@
 ]]></content>
 	<tabTrigger>xif</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Conditional One-line</description>
+	<description>if.. Conditional One-line</description>
 </snippet>

Perl/Snippets/Conditional-one-line-(unless).sublime-snippet → Perl/Snippets/Conditional-one-line-(xunless).sublime-snippet

@@ -3,5 +3,5 @@
 ]]></content>
 	<tabTrigger>xunless</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Conditional One-line</description>
+	<description>unless. Conditional One-line</description>
 </snippet>

Perl/Snippets/Conditional-one-line-(xwhen).sublime-snippet

@@ -0,0 +1,7 @@
+<snippet>
+	<content><![CDATA[${1:expression} when ${2:condition};
+]]></content>
+	<tabTrigger>xwhen</tabTrigger>
+	<scope>source.perl</scope>
+	<description>when.. Conditional One-line</description>
+</snippet>

Perl/Snippets/unless.sublime-snippet → Perl/Snippets/Conditional-unless-(unless).sublime-snippet

@@ -5,5 +5,5 @@
 ]]></content>
 	<tabTrigger>unless</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Conditional</description>
+	<description>unless.. Conditional</description>
 </snippet>

Perl/Snippets/Conditional-unless..else-(unlesse).sublime-snippet

@@ -0,0 +1,11 @@
+<snippet>
+	<content><![CDATA[unless ($1) {
+	${2:# body...}
+} else {
+	${3:# else...}
+}
+]]></content>
+	<tabTrigger>unlesse</tabTrigger>
+	<scope>source.perl</scope>
+	<description>unless..else.. Conditional</description>
+</snippet>

Perl/Snippets/Conditional-unless..elsif..else-(unlessee).sublime-snippet

@@ -0,0 +1,13 @@
+<snippet>
+	<content><![CDATA[unless ($1) {
+	${2:# body...}
+} elsif ($3) {
+	${4:# elsif...}
+} else {
+	${5:# else...}
+}
+]]></content>
+	<tabTrigger>unlessee</tabTrigger>
+	<scope>source.perl</scope>
+	<description>unless..elsif..else.. Conditional</description>
+</snippet>

Perl/Snippets/Conditional-when-(when).sublime-snippet

@@ -0,0 +1,9 @@
+<snippet>
+	<content><![CDATA[when ($1) {
+	${2:# body...}
+}
+]]></content>
+	<tabTrigger>when</tabTrigger>
+	<scope>source.perl</scope>
+	<description>when.. Conditional</description>
+</snippet>

Perl/Snippets/for.sublime-snippet → Perl/Snippets/Loop-for-(for).sublime-snippet

@@ -5,5 +5,5 @@
 ]]></content>
 	<tabTrigger>for</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Loop</description>
+	<description>for.. Loop</description>
 </snippet>

Perl/Snippets/foreach.sublime-snippet → Perl/Snippets/Loop-foreach-(fore).sublime-snippet

@@ -5,5 +5,5 @@
 ]]></content>
 	<tabTrigger>fore</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Loop</description>
+	<description>foreach.. Loop</description>
 </snippet>

Perl/Snippets/Loop-one-line-(xfor).sublime-snippet

@@ -0,0 +1,7 @@
+<snippet>
+	<content><![CDATA[${1:expression} for @${2:array};
+]]></content>
+	<tabTrigger>xfor</tabTrigger>
+	<scope>source.perl</scope>
+	<description>for.. Loop One-line</description>
+</snippet>

Perl/Snippets/Loop-one-line-(xforeach).sublime-snippet → Perl/Snippets/Loop-one-line-(xfore).sublime-snippet

@@ -3,5 +3,5 @@
 ]]></content>
 	<tabTrigger>xfore</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Loop One-line</description>
+	<description>foreach.. Loop One-line</description>
 </snippet>

Perl/Snippets/Loop-one-line-(xuntil).sublime-snippet

@@ -0,0 +1,7 @@
+<snippet>
+	<content><![CDATA[${1:expression} until ${2:condition};
+]]></content>
+	<tabTrigger>xuntil</tabTrigger>
+	<scope>source.perl</scope>
+	<description>until.. Loop One-line</description>
+</snippet>

Perl/Snippets/Loop-one-line-(xwhile).sublime-snippet

@@ -3,5 +3,5 @@
 ]]></content>
 	<tabTrigger>xwhile</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Loop One-line</description>
+	<description>while.. Loop One-line</description>
 </snippet>

Perl/Snippets/while.sublime-snippet → Perl/Snippets/Loop-while-(while).sublime-snippet

@@ -5,5 +5,5 @@
 ]]></content>
 	<tabTrigger>while</tabTrigger>
 	<scope>source.perl</scope>
-	<description>Loop</description>
+	<description>while.. Loop</description>
 </snippet>