Select Code to Download

#!/usr/bin/perl

...
# do some stuff

$foo->printNum(5);

package Log;
use strict;
...
}

1;

package Foo;

...
}

1;