Help for this page
sub lcs{ our %subs = (); ... return wantarray ? @subs : $subs[ 0 ]; }
sub lcs2{ our %subs = (); ... }