Select Code to Download

use strict;
use lib ('./');
...

Alice->mTest2 ("Some stuff", "and something else");
1;

use strict;
package Alice;
...
  my ($junk, $and) = @_;
  print "$junk=$junk\n\$and=$and";
}