xref: /openbsd/gnu/usr.bin/perl/t/lib/croak/gv (revision f3efcd01) 
1__END__
2########
3# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
4$a = ${"#"};
5EXPECT
6$# is no longer supported as of Perl 5.30 at - line 1.
7########
8# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
9$a = ${"*"};
10EXPECT
11$* is no longer supported as of Perl 5.30 at - line 1.
12########
13# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
14$a = ${#};
15EXPECT
16$# is no longer supported as of Perl 5.30 at - line 1.
17########
18# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
19$a = ${*};
20EXPECT
21$* is no longer supported as of Perl 5.30 at - line 1.
22########
23# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
24$a = $#;
25EXPECT
26$# is no longer supported as of Perl 5.30 at - line 1.
27########
28# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
29$a = $*;
30EXPECT
31$* is no longer supported as of Perl 5.30 at - line 1.
32########
33# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
34$# = $a;
35EXPECT
36$# is no longer supported as of Perl 5.30 at - line 1.
37########
38# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
39$* = $a;
40EXPECT
41$* is no longer supported as of Perl 5.30 at - line 1.
42########
43# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
44$a = \$#;
45EXPECT
46$# is no longer supported as of Perl 5.30 at - line 1.
47########
48# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
49$a = \$*;
50EXPECT
51$* is no longer supported as of Perl 5.30 at - line 1.
52########
53# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
54$a = \$#;
55EXPECT
56$# is no longer supported as of Perl 5.30 at - line 1.
57########
58# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
59$a = $*;
60EXPECT
61$* is no longer supported as of Perl 5.30 at - line 1.
62########
63# NAME $# is no longer supported as of Perl 5.30 [RT #133583]
64$a = $#;
65EXPECT
66$# is no longer supported as of Perl 5.30 at - line 1.
67########
68# NAME $* is no longer supported as of Perl 5.30 [RT #133583]
69$a = $*;
70EXPECT
71$* is no longer supported as of Perl 5.30 at - line 1.
72