In che linguaggio?

In Perl? fai la differenza tra gli oggetti data e dividi per 60.

Vedi il manuale delle funzioni localtime e time