#!/usr/bin/perl print "Sleeping for 3 seconds\n"; sleep 3; print "Sleeping for 5 seconds\n"; sleep 5; print STDERR "The sky is falling.\n";