" vim: ft=xpt " XPTemplate template file. " " Language: Perl " Maintainer: Simon Ruderich " License: GPL v3+ " 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 . 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^