annotate bin/hatesgeo @ 7676:f5e3d8df0790

<moon__> mk jnk/readme//\'This area is for files ment to be catted and single data files\'
author HackBot
date Tue, 03 May 2016 00:53:05 +0000
parents e037173e0012
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
e037173e0012 Initial import.
HackBot
parents:
diff changeset
1 #!/bin/sh
e037173e0012 Initial import.
HackBot
parents:
diff changeset
2 perl -n -e '/:(.*?)!.*JOIN/; $j{$1}++; END {print "$_ $j{$_};" for sort {$j{$b} <=> $j{$a}} keys %j}' $@