diff options
author | Jesse Luehrs <doy@tozt.net> | 2010-03-16 21:58:36 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2010-03-16 21:58:36 -0500 |
commit | cad625bc3d951e4420ddf5c959d9a9f801687597 (patch) | |
tree | 46297e89b86603f1fe821c5745af6cf92135aca5 /vim/snippets/perl.snippets | |
parent | e64c9e5b1db135eeb850a7e459f0785f0da40e4f (diff) | |
download | conf-cad625bc3d951e4420ddf5c959d9a9f801687597.tar.gz conf-cad625bc3d951e4420ddf5c959d9a9f801687597.zip |
some more perl snippets
Diffstat (limited to 'vim/snippets/perl.snippets')
-rw-r--r-- | vim/snippets/perl.snippets | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/vim/snippets/perl.snippets b/vim/snippets/perl.snippets index 01f6a0e..9bf7130 100644 --- a/vim/snippets/perl.snippets +++ b/vim/snippets/perl.snippets @@ -72,6 +72,16 @@ snippet script snippet nac use namespace::autoclean; +snippet dd + use Data::Dumper; die Dumper(${1}); +snippet ddd + use Data::Dumper; $Data::Dumper::Maxdepth = ${1:1}; die Dumper(${2}); +snippet package + package ${1:`substitute(matchstr(expand("%"), '^lib/\zs.*\ze\.pm'), '/', '::', 'g')`}; + + ${2} + + 1; # # Moose # @@ -99,6 +109,15 @@ snippet subclass no Moose; 1; +snippet role + package ${1:`substitute(matchstr(expand("%"), '^lib/\zs.*\ze\.pm'), '/', '::', 'g')`}; + use Moose::Role; + + ${2} + + no Moose::Role; + + 1; snippet has has ${1:attr} => ( is => '${2:ro}', |