Select Code to Download

the quick brown fox
brownbrownbrownbrown
..........00000.....

xxxyyxxy
yyyxyxxyyyxyxx
...
abcdefga
abcdefgabcdefg
00000000...... False match

sub lcssN (\$\$;$) {
    my( $ref1, $ref2, $min ) = @_;
...
    return unless $match[ 0 ];
    return wantarray ? @match : $match[ 0 ];
}

sub lcssN (\$\$;$) {
    my( $ref1, $ref2, $min ) = @_;
...
    return unless $match[ 0 ];
    return wantarray ? @match : $match[ 0 ];
}