#!/usr/bin/perl -w use strict; use Time::HiRes ('sleep'); print STDERR 'Pausing:'; sleep(0.01); ## Sleep for 1/100th of a second (10ms) print STDERR 'done',"\n";