($cpu,undef) = split(".", $5); ($hours, $minutes) = split(":", $7); $time = ($hours * 60) + $minutes; %one = ( pid => $1, mem => $4, cpu => $cpu, time => $time, tty => $8, cmd => $9 ); push $users{$2}, $one;