use Secs;

print Secs->new($end - $start),"\n";