Select Code to Download

_8__3__19
4_8___7__

_8__3__19
48_____7_

sub appendinverse {
        my $string = shift;
...
    $s2 = shift(@tests);
    compatible($s1, $s2);
}

_8__3__197_4____18
...
_8__3__197_4____18
48_____7____0__71_
incompatible

_8__3__19
...
_8__3__19
48_____7_
incompatible