#-*- perl -*- # # Copyright (C) 2010 __YOUR_NAME__ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # # $FML$ # package __MODULE_NAME__; use strict; use vars qw(@ISA @EXPORT @EXPORT_OK $AUTOLOAD); use Carp; =head1 NAME __MODULE_NAME__ - what is this =head1 SYNOPSIS =head1 DESCRIPTION =head1 METHODS =head2 new() constructor. =cut # Descriptions: constructor. # Arguments: OBJ($self) HASH_REF($args) # Side Effects: none # Return Value: OBJ sub new { my ($self) = @_; my ($type) = ref($self) || $self; my $me = {}; return bless $me, $type; } =head1 CODING STYLE See C on fml coding style guide. =head1 AUTHOR __YOUR_NAME__ =head1 COPYRIGHT Copyright (C) 2010 __YOUR_NAME__ All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =head1 HISTORY __MODULE_NAME__ appeared in fml8 mailing list driver package. See C for more details. =cut 1;