fork download 
  1. perl -lne '$m<($l=length($_))?$m=$l:0;push @{$x{$l}},$_;END{print "@{$x{$m}}"} '
Success #stdin #stdout 0.02s 5304KB
comments (?)
stdin 
John
Christina
Christine
Tom
stdout 
Christina Christine
https://ideone.com/r0fPWD
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!