use strict; use warnings; $| = (@ARGV > 0); print "this is partial line...."; sleep (20); print "the rest of the story\n";