]> ruderich.org/simon Gitweb - config/dotfiles.git/blobdiff - vim/vim/ftplugin/perl/perl.xpt.vim
Move to vim/ in preparation for merge into new dotfiles repository
[config/dotfiles.git] / vim / vim / ftplugin / perl / perl.xpt.vim
diff --git a/vim/vim/ftplugin/perl/perl.xpt.vim b/vim/vim/ftplugin/perl/perl.xpt.vim
new file mode 100644 (file)
index 0000000..c2b4314
--- /dev/null
@@ -0,0 +1,78 @@
+" vim: ft=xpt
+
+" XPTemplate template file.
+"
+" Language:     Perl
+" Maintainer:   Simon Ruderich <simon@ruderich.org>
+" License:      GPL v3+
+
+" Copyright (C) 2012-2014  Simon Ruderich
+"
+" This file is free software: you can redistribute it and/or modify
+" it under the terms of the GNU General Public License as published by
+" the Free Software Foundation, either version 3 of the License, or
+" (at your option) any later version.
+"
+" This file is distributed in the hope that it will be useful,
+" but WITHOUT ANY WARRANTY; without even the implied warranty of
+" MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+" GNU General Public License for more details.
+"
+" You should have received a copy of the GNU General Public License
+" along with this file.  If not, see <http://www.gnu.org/licenses/>.
+
+
+" Prevent errors if XPTemplate is not installed.
+if !exists('g:XPT#ver')
+    finish
+endif
+
+XPTemplate priority=personal
+
+
+XPT f
+XSET description|post=S(V(), '^description$', 'XXX')
+#!/usr/bin/perl
+
+# `description^
+
+# Copyright (C) `strftime("%Y")^  Simon Ruderich
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+
+use strict;
+use warnings;
+
+
+`cursor^
+
+
+XPT p
+print `value^;
+
+XPT pe
+print STDERR `value^;
+
+XPT pd
+print Dumper(`value^);
+
+
+XPT u
+use `package^;
+`cursor^
+
+XPT udd
+use Data::Dumper;
+`cursor^