NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.
All the Perl that's Practical to Extract and Report
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.
Room for improvement (Score:1)
First of all: :)
unless ... else ...? What were you thinking?Secondly: sticking the
TEST_DIRremoval infile_to_moduleseems like a violation of separatation of concerns. Yeah, I know this script is small, but it still bugged me [perlmonks.org] when I did it in a small script of my own [perlmonks.org]. My suggestion would be to fix it the same way as I did: