Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re: Perl Script to write a perl script

by leocharre (Priest)
on Dec 02, 2009 at 20:49 UTC ( #810684=note: print w/replies, xml ) Need Help??

in reply to Perl Script to write a perl script

Yes, I have a suggestion, stop doing this. Instead, use a vim template for new files...


:insert #!/usr/bin/perl use strict; use vars qw($VERSION); use LEOCHARRE::CLI2 ':all'; use LEOCHARRE::Dir ':all'; $VERSION = sprintf "%d.%02d", q$Revision: 1.3 $ =~ /(\d+)/g; exit; sub usage { qq{$0 [OPTION].. -d debug -h help -v version }} __END__ =pod =head1 NAME =head1 DESCRIPTION =head1 OPTIONS =head1 USAGE =head2 Usage Examples =head1 AUTHOR Leo Charre leocharre at cpan dot org =head1 SEE ALSO =head1 LICENSE This package is free software; you can redistribute it and/or modify i +t under the same terms as Perl itself, i.e., under the terms of the " +Artistic License" or the "GNU General Public License". =head1 DISCLAIMER This package is distributed in the hope that it will be useful, but WI +THOUT ANY WARRANTY; without even the implied warranty of MERCHANTABIL +ITY or FITNESS FOR A PARTICULAR PURPOSE. See the "GNU General Public License" for more details. =cut .

In your ~/.vimrc

autocmd bufnewfile *.pl so ~/

Now, whenever you run a command like # vim , that template will show up. If you place APPNAME where you want it, you can can then do a search and replace such as :%s/APPNAME/blabla/g

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://810684]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (13)
As of 2018-06-22 14:02 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (124 votes). Check out past polls.