package # hide from PAUSE(The [Perl programming] Authors Upload Server) strict; $VERSION = $VERSION = '0.01'; BEGIN { my @pragma = grep -e, map {"$_/" . __FILE__} @INC; my %pragma = map { $_ => 1 } @pragma; if (@pragma >= 2) { my $pragma = join "\n", sort keys %pragma; CORE::warn <ina@cpan.orgE This project was originated by INABA Hitoshi. =head1 LICENSE AND COPYRIGHT This software is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See L. This software is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. =head1 ACKNOWLEDGEMENTS This software was made referring to software and the document that the following hackers or persons had made. I am thankful to all persons. Sebastien Aperghis-Tramoni, warnings-compat =cut