1 gv.c AOK 2 3 Can't locate package %s for @%s::ISA 4 @ISA = qw(Fred); joe() 5 6 Use of inherited AUTOLOAD for non-method %s::%.*s() is deprecated 7 sub Other::AUTOLOAD { 1 } sub Other::fred {} 8 @ISA = qw(Other) ; 9 fred() ; 10 11 $# is no longer supported 12 $* is no longer supported 13 14 $a = ${"#"} ; 15 $a = ${"*"} ; 16 17 Mandatory Warnings ALL TODO 18 ------------------ 19 20 Had to create %SVf unexpectedly [gv_fetchpv] 21 Attempt to free unreferenced glob pointers [gp_free] 22 23__END__ 24# gv.c 25use warnings 'syntax' ; 26@ISA = qw(Fred); joe() 27EXPECT 28Can't locate package Fred for @main::ISA at - line 3. 29Undefined subroutine &main::joe called at - line 3. 30######## 31# gv.c 32no warnings 'syntax' ; 33@ISA = qw(Fred); joe() 34EXPECT 35Undefined subroutine &main::joe called at - line 3. 36######## 37# gv.c 38sub Other::AUTOLOAD { 1 } sub Other::fred {} 39@ISA = qw(Other) ; 40use warnings 'deprecated' ; 41fred() ; 42EXPECT 43Use of inherited AUTOLOAD for non-method main::fred() is deprecated at - line 5. 44######## 45# gv.c 46use utf8; 47use open qw( :utf8 :std ); 48sub Oᕞʀ::AUTOLOAD { 1 } sub Oᕞʀ::fᕃƌ {} 49@ISA = qw(Oᕞʀ) ; 50use warnings 'deprecated' ; 51fᕃƌ() ; 52EXPECT 53Use of inherited AUTOLOAD for non-method main::fᕃƌ() is deprecated at - line 7. 54######## 55# gv.c 56$a = ${"#"}; 57$a = ${"*"}; 58no warnings 'deprecated' ; 59$a = ${"#"}; 60$a = ${"*"}; 61EXPECT 62$# is no longer supported at - line 2. 63$* is no longer supported at - line 3. 64######## 65# gv.c 66$a = ${#}; 67$a = ${*}; 68no warnings 'deprecated' ; 69$a = ${#}; 70$a = ${*}; 71EXPECT 72$# is no longer supported at - line 2. 73$* is no longer supported at - line 3. 74######## 75# gv.c 76$a = $#; 77$a = $*; 78$# = $a; 79$* = $a; 80$a = \$#; 81$a = \$*; 82no warnings 'deprecated' ; 83$a = $#; 84$a = $*; 85$# = $a; 86$* = $a; 87$a = \$#; 88$a = \$*; 89EXPECT 90$# is no longer supported at - line 2. 91$* is no longer supported at - line 3. 92$# is no longer supported at - line 4. 93$* is no longer supported at - line 5. 94$# is no longer supported at - line 6. 95$* is no longer supported at - line 7. 96######## 97# gv.c 98@a = @#; 99@a = @*; 100$a = $#; 101$a = $*; 102EXPECT 103$# is no longer supported at - line 4. 104$* is no longer supported at - line 5. 105######## 106# gv.c 107$a = $#; 108$a = $*; 109@a = @#; 110@a = @*; 111EXPECT 112$# is no longer supported at - line 2. 113$* is no longer supported at - line 3. 114######## 115# gv.c 116use warnings 'syntax' ; 117use utf8; 118use open qw( :utf8 :std ); 119package Ｙ; 120@ISA = qw(Fred); joe() 121EXPECT 122Can't locate package Fred for @Ｙ::ISA at - line 6. 123Undefined subroutine &Ｙ::joe called at - line 6. 124