Help for this page
my $maxsize = 0; map {chomp; $maxsize = ($maxsize>length)?($maxsize):(length)} @lines;
my $maxsize = 0; foreach my $line (@lines) ... $maxsize = $lineLength; } }
$result = ($x > $y)?(14):(-5)