UNIVERSAL::isa($qr, 'Regexp')