Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
sub TestSub2 {
    print "TestSub2\n";
}

Select or download this

TestSub1
TestSub2
TestSub2
TestSub1
TestSub1