Help for this page
$string =~ /(.{$n}).*\1/;
sub longestrepeat { my($string) = @_; ... return $n - 1 unless $string =~ /(.{$n}).*\1/; } }
$string =~ /(.{$n}).*\1.*\1/;
www.com | www.net | www.org
No recent polls found