BEGIN {
   if (!defined(&re::is_regexp)) {
      package re;
      my $re_class = ref qr//;
      *is_regexp = sub($) {
         local *__ANON__ = 'is_regexp';
         return UNIVERSAL::isa($_[0], $re_class);
      };
   }
}