From 73ae34eb58b5823c3daa97fe18f29cf6d62d641e Mon Sep 17 00:00:00 2001
From: mattn <mattn.jp@gmail.com>
Date: Wed, 8 May 2013 21:49:06 +0900
Subject: perl filter

---
 autoload/sonictemplate/lang/perl.vim | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/autoload/sonictemplate/lang/perl.vim b/autoload/sonictemplate/lang/perl.vim
index be5628f..5c2da99 100644
--- a/autoload/sonictemplate/lang/perl.vim
+++ b/autoload/sonictemplate/lang/perl.vim
@@ -1,6 +1,12 @@
 function! sonictemplate#lang#perl#guess()
-  if expand('%:t') == 'Makefile.PL'
+  if expand('%:t') ==# 'Makefile.PL'
     return 'make'
   endif
+  if expand('%:t:e') ==# 'pl'
+    return 'script'
+  endif
+  if expand('%:t:e') ==# 'pm'
+    return 'package'
+  endif
   return ''
 endfunction
-- 
cgit v1.2.3-54-g00ecf