Select Code to Download

package MyModule2; #line 1

...
   return ($total);
}
1;

#!/usr/bin/perl -w

...
my $amount = 12;

print add_it($amount),"\n";

sub add_it { 
   my $amount = shift;
...
   return ($total);
}
1;

use MyModule;

my $amount = 12;

print add_it($amount),"\n";