Help for this page

Select Code to Download


  1. or download this
    $Source::storage = Storage->new();
# in package Destination
do_stuff_to($Source::storage);
  2. or download this
    package Destination;
@ISA = qw(Source);
...
# main code
$Source::storage = Storage->new();
# Destination can now use $storage, hurrah