% steph@ape (/home/stephan/w/tp) %
% perl -MString::LCSS -le 'print scalar String::LCSS::lcss(qw[xaxbcxdx aybycyydy])'     


% steph@ape (/home/stephan/w/tp) %
% perl -MString::LCSS -le 'print scalar String::LCSS::lcss(qw[xabcdxxxxxx yyyabcdyyyyy])'
abcd