RosettaCodeData/Task/Longest-string-challenge/Sidef/longest-string-challenge.sidef

10 lines
220 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
var l = ''; # Sample longest string seen.
var a = ''; # Accumulator to save longest strings.
STDIN.each { |n|
n.substr(l.len) ? (a = n; l = n)
: (!l.substr(n.len) && a.concat!(n));
}
print a;