my $sttime = time;
sleep(60);
print "Elapsed time : ", time - $sttime;