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