exec $0 unless $all_done;

##</code><code>##

print "hi!\n";
sleep 2;
exec $0;

##</code><code>##

H:\>test.pl
hi!
hi!

H:\>hi!
hi!
hi!