t/lib/warnings/universal

   1   universal.c AOK
   2
   3   Can't locate package %s for @%s::ISA  [S_isa_lookup]
   4
   5
   6
   7 __END__
   8 # universal.c [S_isa_lookup]
   9 print("SKIPPED\n# todo fix: overloading triggers spurious warnings\n"),exit;
  10 use warnings 'misc' ;
  11 @ISA = qw(Joe) ;
  12 my $a = bless [] ;
  13 UNIVERSAL::isa $a, Jim ;
  14 EXPECT
  15 Can't locate package Joe for @main::ISA at - line 5.