This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add test for [perl #129157]
[perl5.git] / t / lib / croak / toke_l1
CommitLineData
16a07156
KW
1# File is encoded in latin-1 so can have malformed-utf8
2__END__
3# NAME [perl #129037]
4BEGIN{{};$^H=-1}0Ã
5EXPECT
6Malformed UTF-8 character: \xc3\x0a (unexpected non-continuation byte 0x0a, immediately after start byte 0xc3; need 2 bytes, got 1) at - line 1.
7Constant(0): $^H{integer} is not defined at - line 1, at end of line
8Malformed UTF-8 character (fatal) at - line 1.
9########
1fb23c72
KW
10# NAME [perl #129157]
11BEGIN {$^H {q} = sub {pop and-t write gmtime getpwuid @p }; $^H =-6**4,0*215}
12"@ust weÃÃÃÃÃÃÃÃÃÃÃtprotobyname"; "9 "Y=n {pop and-p[p };shmr [A
13 T--A
14 G-'-C
15 G----C
16 C\10---G
17A----T
18C---G
19G--C
20 CG
21 TA
22T--A
23C---G
24T----A
25 C----G
26 A----T
27 endnetent C---G
28 G--C
29 GC
30 TA
31 G--C
32 C---G
33 G---È-A
34 CG
35 AT
36G--C
37A---T
38A----TØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØÞØØØØØØØØØØØØØØØØØØØØØØÚØØØØØ\80ØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØimportØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØXØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØcØØØØØÊØØØØØØØØØØØØØØØØØØØØØØØØØØØ
39 C----G
40 C----G
41 A---T
42 A--T
43 CG
44 CG
45 G--C
46 G---C
47 G\17---C
48 A----T
49T----A
50C---G
51G--C
52 CG
53 TA
54A--T
55A---T
56G----C
57 A----T
58 A----T
59 C---G
60 A--T
61 ÿÿÿ\80GC
62 TA
63 G--C
64 C---G
65 T----A
66 G----C
67G----C
68C---G\0\10\0\0A
69 AT
70 CG
71G--C
72G---C
73T----A
74 C----G
75 G----C
76 C---Gx C--G
77setpriority AT
78 T--A
79 C---G
80 G----C
81 G----6
82A----T
83T---A
84G--C
85 CG
86 TA
87G--C
88A---T
89G--link--C
90 A\v---T
91 G----C
92 .;@_{A
93 => C
94 =>
95 G=>
96ÃÃÃÃÃÃÃÃtprotobyname"; "9 "Y=n {pop and-p[p };shmread $^H LLLLL_'_=I{"Y=n {pop and-p\8cp \r\r\r\r\r\r\8fÿ\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r'\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r\r13\0ÿï\0\9e?eachcontznueec\82\ 4\0rocalt\ 1ebreaMMqw//MMM\80MMMMMMMMMMMMMMM@M\7fM\rMMMMMMMMMMMMM*+MMMMMMMMMMMMMMM into a <var>Variable</va\92>.
97and you set it's <tt>value</tt>. <u>Amazing!</u> <br>
98<object A--T
99 CG
100 recvG
101
102 G---\0d
103 A----T
104T----A*C---G
105G--C
106 CG
107 TA
108A--T
109A---C
110G----C
111 A----T
112pe some HTML</kbd> into a <var>Variab TA
113 G--C
114 C---G
115 T----A
116 G----C
117G----C
118C---G
119T--A
120 AT
121 CG
122G--C
123G---Cÿÿÿ\80--A
124 C----G
125 G----C
126 C---G
127 C--G
128 CG
129 AT
130 T--A
131 C---G
132 G----C
133 G----C
134A----T
135T---A
136G--C
137 CG
138 TA
139G--C
140A\7fÿÿÿ
141G\12---C
142 A---G
143 A----T
144 endnetent C---G
145 G--C
146 GC
147 </var TA
148 G-FC
149 C---G
150 G---È-A
151 CG
152 AT
153G---T
154 G----C
155 .;@_{A
156 =ØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØimportØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØ\7f\0ØØØØØØØØØØØØØØØØØØØØØØXØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØØreadlineØØØØØØØØØ> C
157 =>
158 G=>
159 T=>}
160 =0'.3AUTOLOAD*
161 (\w).*
162(\w).*
163\n;$ 1
164};gexÿ\7f s;(.)(
165 .)(.)(.
166 );cgr
167 64*$
168 1+
169 16
170 *$2+
171 4 *$
172 3 +$
173 4 ;gex
174; eval
175EXPECT
176Malformed UTF-8 character: \xc3\xc3 (unexpected non-continuation byte 0xc3, immediately after start byte 0xc3; need 2 bytes, got 1) at - line 2.
177Malformed UTF-8 character (fatal) at - line 2.
178########