fork download
  1. perl -lne '$c{length($_)}++ }{ print qq($_ $c{$_}) for (sort keys %c)'
Success #stdin #stdout 0.02s 5348KB
stdin
this
is
a
sample
file
with
several
lines
of
varying
length
stdout
1 1
2 2
4 3
5 1
6 2
7 2