bye(); # does the necessary cleanup
END {
- unlink "big"; # be paranoid about leaving 5 gig files lying around
+ # unlink may fail if applied directly to a large file
+ # be paranoid about leaving 5 gig files lying around
+ open(BIG, ">big"); # truncate
+ close(BIG);
+ 1 while unlink "big"; # standard portable idiom
}
# eof