*isa = \&UNIVERSAL::isa;

sub regex_tester {
    my $thingie = shift;
    return isa( $thingie, 'Regex' );
}