Select Code to Download

package MyPackage;
sub doSomething { 
    #do something, mutley
}

use MyStuff;
my $a = "foo";
my $b = doSoemthing($a);