perl -e'$x=time;print scalar(split/ /,<>)/(time-$x)*60'