fork download 
  1. perl -lne '$c{length($_)}++ }{ print qq($_ $c{$_}) for (sort keys %c)'
Success #stdin #stdout 0.02s 5348KB
comments (?)
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
https://ideone.com/56PU4r
language:
Bash (bash 5.0.3)
created:
11 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!