Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
    "my ($x, $y) = qw{abXcdYef pqXrsYtu};
    ...
    "
    number of differences: 6
    differing positions: 0 1 3 4 6 7