Select Code to Download

package Fool {
    use strict;
...
    say __PACKAGE__;
    1;
}

#!/usr/bin/env perl

...

__END__

package President {
...

__END__