Help for this page

Select Code to Download


  1. or download this
    use strict; use warnings;
use Foo qw/ bar /;

print bar('baz');
__END__
  2. or download this
    package Foo;
use strict; use warnings;
...
sub bar { return uc shift }

1;