Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...
my $foo;
BEGIN { $foo = "bar" }
use License ($foo);
  2. or download this
    package License;
use strict;
...
    print "foo = $foo\n";
}
1;
  3. or download this
    my $foo = "bar";
require License;
License->import($foo);