Skip to content

Instantly share code, notes, and snippets.

@ekiru
Created July 26, 2010 22:07
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save ekiru/3c03010b81c42bec225f to your computer and use it in GitHub Desktop.
my $t;($t+=.value;say .key.perl,':',.value)for slurp(@*ARGS[0]||die).comb.classify(~*).map({;.key=>+.value}).sort(*.value);say "Total: $t."
@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

464 characters e5ced4

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

384 characters db01b9

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

350 characters d1be50

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

327 characters 5c923e

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

304 characters cc261f

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

271 characters d00f35

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

256 characters b05bc2

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

234 characters 866f9d

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

229 characters 09bd85

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

196 characters 753297

@ekiru
Copy link
Author

ekiru commented Jul 26, 2010

187 characters 8a625f

@ekiru
Copy link
Author

ekiru commented Jul 27, 2010

150 characters c20767

@ekiru
Copy link
Author

ekiru commented Jul 27, 2010

140 characters 237d45

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment