# -*- mode: snippet -*- # name: perlmodule # key: perlmodule # expand-env: ((yas-indent-line -1)) # -- # This module is part of ${1:the_project}, 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 `(format-time-string "%Y")` by Don Armstrong . package ${2:THEPACKAGE}; =head1 NAME $2 -- $3 =head1 SYNOPSIS C =head1 DESCRIPTION $4 =cut use warnings; use strict; use vars qw($VERSION $DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT); use base qw(Exporter); BEGIN{ $VERSION = '0.1'; $DEBUG = 0 unless defined $DEBUG; @EXPORT = (); %EXPORT_TAGS = (#a => [qw()], ); @EXPORT_OK = (); Exporter::export_ok_tags(keys %EXPORT_TAGS); $EXPORT_TAGS{all} = [@EXPORT_OK]; } $0 1; __END__ # Local Variables: # indent-tabs-mode: nil # cperl-indent-level: 4 # End: