Select Code to Download

    use IO::handle;
    use FileHandle;

BEGIN {
    @PERL_SHARE = (
...
                  );
    unshift(@INC, @PERL_SHARE);
};