#!/usr/bin/perl -w
$start=time();

# блаблабла

print 'Время работы скрипта '.(time()-$start).' секунд';