Help for this page
package MyModule; use strict; ... sub func2 { return map{ uc }@_ } 1;
#!/usr/bin/perl -w use strict; ... # use MyModule qw(:Both); # print func1(@list),"\n"; # print func2(@list),"\n";
BEGIN { push @INC, '/my/dir' } # or BEGIN { unshift @INC, '/my/dir' } # or use lib '/my/dir';
www.com | www.net | www.org
No recent polls found