#! /usr/bin/perl -w

print "First line of the script";
print "Second line of the script";

$time = 5;
while($time > 0) {
sleep  (5);
$time--;
}