X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=templates%2Fperl_module_header.pm;h=b28a314e6fae842bd6851f20bea45a66c49875d8;hb=a9b4ea8ed949ae1931ede89df3b10b7fd8c82a33;hp=774dcc5b5d2f5d653047f40fb9c8fc775c8290be;hpb=99159eb79ad94b1413e6cad7ef91936278b503cb;p=lib.git diff --git a/templates/perl_module_header.pm b/templates/perl_module_header.pm index 774dcc5..b28a314 100644 --- a/templates/perl_module_header.pm +++ b/templates/perl_module_header.pm @@ -1,14 +1,14 @@ -# This module is part of , and is released -# under the terms of the GPL version 2, or any later version. See the -# file README and COPYING for more information. -# Copyright 2003 by Don Armstrong . -# $Id: $ +# This module is part of , and +# is released under the terms of the GPL version 3, or any later +# version (at your option). See the file README and COPYING for more +# information. +# Copyright 2015 by Don Armstrong . -package ; +package THEPACKAGE; =head1 NAME - -- +THEPACKGE -- =head1 SYNOPSIS @@ -22,20 +22,20 @@ None known. =cut - +use warnings; use strict; use vars qw($VERSION $DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT); use base qw(Exporter); BEGIN{ - ($VERSION) = q$Revision: 1.3 $ =~ /^Revision:\s+([^\s+])/; + $VERSION = '0.1'; $DEBUG = 0 unless defined $DEBUG; - @EXPORT = () -# %EXPORT_TAGS = (a => [qw()] -# ); + @EXPORT = (); + %EXPORT_TAGS = (#a => [qw()], + ); @EXPORT_OK = (); -# Exporter::export_ok_tags(qw(add get)); + Exporter::export_ok_tags(keys %EXPORT_TAGS); $EXPORT_TAGS{all} = [@EXPORT_OK]; }