Select Code to Download

print keys(%newPackage::),"\n";
print "\n\n";
...
package newPackage;     #creating the package and its namespace
sub subroutine1 {print "*This is a new package called from within the 
+file*\n";}