Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Average Node XP per Month -- oneliner

by Discipulus (Canon)
on Apr 26, 2017 at 12:30 UTC ( [id://1188964]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    # win double quotes!
    
    perl -F"/\-|\s/" -lane "$m{$F[0]}[0]++;$m{$F[0]}[1]+=$F[2]}{map{print 
    +join' ',$_,$m{$_}[1]/$m{$_}[0]}sort keys %m" xp.out
    

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others chanting in the Monastery: (4)
As of 2024-03-28 15:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found