Select Code to Download

#!/usr/bin/perl

...
    close FILE;
}

#
# This is a nonsucking forking module.
...

# return 1;
1;