Select Code to Download

use warnings;
use strict;
...
    close $fh or die "closing '$filename' after read";

}

package Extra;

...
#     }

1;