Name |
newpl
|
Version |
1.15 |
Updated |
2004/03/16 21:09:58 |
RCS |
newpl,v 1.15 2004/03/16 21:09:58 forman Exp forman |
Rating |
|
Category |
Perl |
Description |
newpl creates a perl file from a template, makes the file executable, and invokes an editor in a single command. The template provides code for flags, usage, and help; comments which include author information, creation date, and RCS revision tags; and a basic pod template for creating perl's version of a man page. Think of it as "perl in a can".
|
Download |
newpl
|
|
##
## Copyright (C) 2003, 2004 Michael Forman. All rights reserved.
## This program is free software; you can redistribute it
## and/or modify it under the same terms as Perl itself.
## Please see the Perl Artistic License.
#
$| = 1;
use Getopt::Long;
#--------------------------------------------------------------------
Getopt::Long::Configure("no_ignore_case");
GetOptions(
"h|help" => \$help,
"d|debug" => \$debug,
"t|test" => \$test,
"V|version" => \$vers,
#-----------------------
);
#--------------------------------------------------------------------
if($help){ exec("perldoc $0"); }
if($vers){ version(); }
|
|
NEWPL(1) User Contributed Perl Documentation NEWPL(1)
NAME
newpl - creates a perl file from a template
SYNOPSIS
newpl [ file ... ]
DESCRIPTION
newpl creates a perl file from a template, makes the file
executable, and invokes an editor in a single command.
The template provides code for flags, usage, and help;
comments which include author information, creation date,
and RCS revision tags; and a basic pod template for creat
ing perl's version of a man page. Think of it as "perl in
a can".
EXAMPLE
newpl file
AUTHOR AND COPYRIGHT
Michael Forman
http://www.Michael-Forman.com
Copyright (C) 1999-2004 Michael Forman. All rights
reserved. This program is free software; you can redis
tribute it and/or modify it under the same terms as Perl
itself. Please see the Perl Artistic License.
VERSION
Current Revision: $Revision: 1.15 $ Last Modification:
$Date: 2004/03/16 21:09:58 $
perl v5.8.1 2004-03-16 NEWPL(1)