SV* test( SV *a, SV *b ) {
    if( SvREADONLY( a ) )        // Readonly? Take a copy.
        a = newSVpv( SvPVX( a ), 0 );