Select Code to Download

for (1 .. 10) { 
    require "./foo.pl"; 
    delete $INC{ './foo.pl' };
}

$ echo 'print@ARGV' > t;
$ perl -le 'for ( 1 .. 3 ) { @ARGV = $_; require"t"; delete $INC{"t"} 
+}'
1
2
3