This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove all magic in untie()
[perl5.git] / t / lib / warnings / gv
CommitLineData
599cee73
PM
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 Use of $# is deprecated
f02c194e 12 $* has been removed
599cee73
PM
13
14 $a = ${"#"} ;
15 $a = ${"*"} ;
16
0453d815
PM
17 Mandatory Warnings ALL TODO
18 ------------------
599cee73 19
0453d815
PM
20 Had to create %s unexpectedly [gv_fetchpv]
21 Attempt to free unreferenced glob pointers [gp_free]
22
599cee73
PM
23__END__
24# gv.c
4438c4b7 25use warnings 'misc' ;
599cee73
PM
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
4438c4b7 32no warnings 'misc' ;
0453d815
PM
33@ISA = qw(Fred); joe()
34EXPECT
35Undefined subroutine &main::joe called at - line 3.
36########
37# gv.c
599cee73
PM
38sub Other::AUTOLOAD { 1 } sub Other::fred {}
39@ISA = qw(Other) ;
4438c4b7 40use warnings 'deprecated' ;
599cee73
PM
41fred() ;
42EXPECT
43Use of inherited AUTOLOAD for non-method main::fred() is deprecated at - line 5.
44########
45# gv.c
4438c4b7 46use warnings 'deprecated' ;
599cee73
PM
47$a = ${"#"};
48$a = ${"*"};
4438c4b7 49no warnings 'deprecated' ;
0453d815
PM
50$a = ${"#"};
51$a = ${"*"};
599cee73
PM
52EXPECT
53Use of $# is deprecated at - line 3.
9d8ca66a 54The variable "$*" is no longer supported at - line 4.