X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=templates%2Fperl_module_header.pm;h=b28a314e6fae842bd6851f20bea45a66c49875d8;hb=6b16ff5c2f488d5291794bc7b906f25c65eb8f53;hp=023005cb08285130341c35f788e21418faf15da5;hpb=a854d5403d7228f2ed8d951bbbed9bf0e426cd0e;p=lib.git diff --git a/templates/perl_module_header.pm b/templates/perl_module_header.pm index 023005c..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 2006 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 @@ -28,14 +28,14 @@ use vars qw($VERSION $DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT); use base qw(Exporter); BEGIN{ - ($VERSION) = q$Revision$ =~ /^Revision:\s+([^\s+])/; + $VERSION = '0.1'; $DEBUG = 0 unless defined $DEBUG; @EXPORT = (); -# %EXPORT_TAGS = (a => [qw()] -# ); + %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]; }