How about: $longest;
split /\s+/; # ... on whitespace
for $string (@_) {
$longest = $string if (length($string) >= length($longest));
}
Since no one said what a string is, this should be fine. I/O is
left to the imagination of the reader :) There is a problem
however - if there are multiple strings of the same length, this
will only find the last one such string...
HTH;
_Sx____________________
('> -Sx- IUDICIUM
//\ Have Computer -
v_/_ Will Hack...
