http://qs321.pair.com?node_id=111634


in reply to Re: Re: How fast do I type?
in thread How fast do I type?

subtract ."\n" and add e (thanks once again to chipmunk)
perl -le'$x=time;print "WPM:".(scalar(split//,<>)/6)/(time-$x)*60'

Replies are listed 'Best First'.
Re: (jeffa) 3Re: How fast do I type?
by mischief (Hermit) on Sep 12, 2001 at 15:33 UTC

    for efficiency:

    perl -le'$x=time;print "WPM:",(scalar(split//,<>)/6)/(time-$x)*60'

    :)

Re: (jeffa) 3Re: How fast do I type?
by foogod (Friar) on Sep 11, 2001 at 05:54 UTC

    nice! ... forgot about the results of a -e modifier ...

    thanks,

    - f o o g o d