Advertisement
Guest User

Untitled

a guest
Jun 18th, 2019
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.18 KB | None | 0 0
  1. perl -lane 'code' input.txt > output.txt
  2.  
  3. perl -lane "$h{$_}++ for @F; END{for $w (sort {$h{$b}<=>$h{$a} || $a cmp $b} keys %h) {print qq($h{$w}t$w)}}" file > freq
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement