Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: Re: How fast do I type?

by foogod (Friar)
on Sep 10, 2001 at 23:37 UTC ( [id://111545]=note: print w/replies, xml ) Need Help??


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

golfed .... with line breaks and prefix
perl -e'$x=time;print "WPM:".(scalar(split//,<>)/6)/(time-$x)*60."\n"'

Replies are listed 'Best First'.
(jeffa) 3Re: How fast do I type?
by jeffa (Bishop) on Sep 11, 2001 at 04:16 UTC
    subtract ."\n" and add e (thanks once again to chipmunk)
    perl -le'$x=time;print "WPM:".(scalar(split//,<>)/6)/(time-$x)*60'

      for efficiency:

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

      :)

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

      thanks,

      - f o o g o d

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://111545]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others browsing the Monastery: (8)
As of 2024-04-19 15:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found