Select Code to Download

#!/usr/bin/perl
use strict;
...
our $variableName = "HelloWorld";
$returnedValue = packageName->routineName();
print $returnedValue;

package packageName;
sub routine {
...
}
1;