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

##</code><code>##

for (1 .. 10) { 
    do "./foo.pl"; 
    die $@ if $@;
}