В Perl:
my ($usr,$sys,$cusr,$csys) = times;
printf "real %s, user %s, sys %s\n", $usr + $sys, $usr, $sys;
Это правда? Я читал некоторые другие вопросы, где люди делали такие вещи, как сохранение текущего времени в переменной и сбор его позже, но почему бы это не сработало?