3 we seem to have lost a few ambiguous warnings!!
7 Use of comma-less variable list is deprecated
8 (called 3 times via depcom)
10 \1 better written as $1
11 use warnings 'syntax' ;
15 Semicolon seems to be missing
32 Multidimensional syntax %.*s not supported
35 You need to quote \"%s\""
36 sub fred {} ; $SIG{TERM} = fred;
38 Scalar value %.*s better written as $%.*s"
42 Can't use \\%c to mean $%c in expression
43 $_ = "ab" ; s/(ab)/\1/e;
45 Unquoted string "abc" may clash with future reserved word at - line 3.
49 Possible attempt to separate words with commas
52 Possible attempt to put comments in qw() list
55 %s (...) interpreted as function
60 Ambiguous use of %c{%s%s} resolved to %c%s%s
65 Ambiguous use of %c{%s} resolved to %c%s
67 sub fred {} $a = ${fred}
73 Bareword \"%s\" refers to nonexistent package
76 Ambiguous call resolved as CORE::%s(), qualify as such or use &
80 Unrecognized escape \\%c passed through
83 %s number > %s non-portable
84 my $a = 0b011111111111111111111111111111110 ;
85 $a = 0b011111111111111111111111111111111 ;
86 $a = 0b111111111111111111111111111111111 ;
94 Integer overflow in binary number
95 my $a = 0b011111111111111111111111111111110 ;
96 $a = 0b011111111111111111111111111111111 ;
97 $a = 0b111111111111111111111111111111111 ;
105 dump() better written as CORE::dump()
109 Use of "%s" without parentheses is ambiguous [check_uni]
112 Ambiguous use of -%s resolved as -&%s() [yylex]
113 sub fred {} ; - fred ;
115 Precedence problem: open %.*s should be open(%.*s) [yylex]
118 Operator or semicolon missing before %c%s [yylex]
119 Ambiguous use of %c resolved as operator %c
124 use warnings 'deprecated' ;
129 no warnings 'deprecated' ;
135 Use of comma-less variable list is deprecated at - line 5.
136 Use of comma-less variable list is deprecated at - line 5.
137 Use of comma-less variable list is deprecated at - line 5.
140 use warnings 'deprecated' ;
143 no warnings 'deprecated' ;
147 Use of bare << to mean <<"" is deprecated at - line 3.
150 use warnings 'syntax' ;
152 no warnings 'syntax' ;
155 \1 better written as $1 at - line 3.
158 use warnings 'semicolon' ;
161 no warnings 'semicolon' ;
165 Semicolon seems to be missing at - line 3.
168 use warnings 'syntax' ;
180 Reversed += operator at - line 3.
181 Reversed -= operator at - line 4.
182 Reversed *= operator at - line 5.
183 Reversed %= operator at - line 6.
184 Reversed &= operator at - line 7.
185 Reversed .= operator at - line 8.
186 Reversed ^= operator at - line 9.
187 Reversed |= operator at - line 10.
188 Reversed <= operator at - line 11.
189 syntax error at - line 8, near "=."
190 syntax error at - line 9, near "=^"
191 syntax error at - line 10, near "=|"
192 Unterminated <> operator at - line 11.
195 no warnings 'syntax' ;
207 syntax error at - line 8, near "=."
208 syntax error at - line 9, near "=^"
209 syntax error at - line 10, near "=|"
210 Unterminated <> operator at - line 11.
213 use warnings 'syntax' ;
215 no warnings 'syntax' ;
218 Multidimensional syntax $a[1,2] not supported at - line 3.
221 use warnings 'syntax' ;
222 sub fred {} ; $SIG{TERM} = fred;
223 no warnings 'syntax' ;
226 You need to quote "fred" at - line 3.
229 use warnings 'syntax' ;
232 no warnings 'syntax' ;
236 Scalar value @a[3] better written as $a[3] at - line 3.
237 Scalar value @a{3} better written as $a{3} at - line 4.
240 use warnings 'syntax' ;
243 no warnings 'syntax' ;
247 Can't use \1 to mean $1 in expression at - line 4.
250 use warnings 'reserved' ;
255 no warnings 'reserved' ;
258 Unquoted string "abc" may clash with future reserved word at - line 3.
266 Possible attempt to separate words with commas at - line 3.
274 Possible attempt to put comments in qw() list at - line 3.
277 use warnings 'syntax' ;
280 print (...) interpreted as function at - line 3.
283 no warnings 'syntax' ;
289 use warnings 'syntax' ;
292 printf (...) interpreted as function at - line 3.
295 no warnings 'syntax' ;
301 use warnings 'syntax' ;
304 sort (...) interpreted as function at - line 3.
307 no warnings 'syntax' ;
313 use warnings 'ambiguous' ;
315 no warnings 'ambiguous' ;
318 Ambiguous use of ${time[...]} resolved to $time[...] at - line 3.
321 use warnings 'ambiguous' ;
324 Ambiguous use of ${time{...}} resolved to $time{...} at - line 3.
327 no warnings 'ambiguous' ;
333 use warnings 'ambiguous' ;
335 no warnings 'ambiguous' ;
338 Ambiguous use of ${time} resolved to $time at - line 3.
341 use warnings 'ambiguous' ;
344 no warnings 'ambiguous' ;
347 Ambiguous use of ${fred} resolved to $fred at - line 4.
350 use warnings 'syntax' ;
351 $a = _123; print "$a\n"; #( 3 string)
352 $a = 1_23; print "$a\n";
353 $a = 12_3; print "$a\n";
354 $a = 123_; print "$a\n"; # 6
355 $a = _+123; print "$a\n"; # 7 string)
356 $a = +_123; print "$a\n"; #( 8 string)
357 $a = +1_23; print "$a\n";
358 $a = +12_3; print "$a\n";
359 $a = +123_; print "$a\n"; # 11
360 $a = _-123; print "$a\n"; #(12 string)
361 $a = -_123; print "$a\n"; #(13 string)
362 $a = -1_23; print "$a\n";
363 $a = -12_3; print "$a\n";
364 $a = -123_; print "$a\n"; # 16
365 $a = 123._456; print "$a\n"; # 17
366 $a = 123.4_56; print "$a\n";
367 $a = 123.45_6; print "$a\n";
368 $a = 123.456_; print "$a\n"; # 20
369 $a = +123._456; print "$a\n"; # 21
370 $a = +123.4_56; print "$a\n";
371 $a = +123.45_6; print "$a\n";
372 $a = +123.456_; print "$a\n"; # 24
373 $a = -123._456; print "$a\n"; # 25
374 $a = -123.4_56; print "$a\n";
375 $a = -123.45_6; print "$a\n";
376 $a = -123.456_; print "$a\n"; # 28
377 $a = 123.456E_12; print "$a\n"; # 29
378 $a = 123.456E1_2; print "$a\n";
379 $a = 123.456E12_; print "$a\n"; # 31
380 $a = 123.456E_+12; print "$a\n"; # 32
381 $a = 123.456E+_12; print "$a\n"; # 33
382 $a = 123.456E+1_2; print "$a\n";
383 $a = 123.456E+12_; print "$a\n"; # 35
384 $a = 123.456E_-12; print "$a\n"; # 36
385 $a = 123.456E-_12; print "$a\n"; # 37
386 $a = 123.456E-1_2; print "$a\n";
387 $a = 123.456E-12_; print "$a\n"; # 39
388 $a = 1__23; print "$a\n"; # 40
389 $a = 12.3__4; print "$a\n"; # 41
390 $a = 12.34e1__2; print "$a\n"; # 42
391 no warnings 'syntax' ;
392 $a = _123; print "$a\n";
393 $a = 1_23; print "$a\n";
394 $a = 12_3; print "$a\n";
395 $a = 123_; print "$a\n";
396 $a = _+123; print "$a\n";
397 $a = +_123; print "$a\n";
398 $a = +1_23; print "$a\n";
399 $a = +12_3; print "$a\n";
400 $a = +123_; print "$a\n";
401 $a = _-123; print "$a\n";
402 $a = -_123; print "$a\n";
403 $a = -1_23; print "$a\n";
404 $a = -12_3; print "$a\n";
405 $a = -123_; print "$a\n";
406 $a = 123._456; print "$a\n";
407 $a = 123.4_56; print "$a\n";
408 $a = 123.45_6; print "$a\n";
409 $a = 123.456_; print "$a\n";
410 $a = +123._456; print "$a\n";
411 $a = +123.4_56; print "$a\n";
412 $a = +123.45_6; print "$a\n";
413 $a = +123.456_; print "$a\n";
414 $a = -123._456; print "$a\n";
415 $a = -123.4_56; print "$a\n";
416 $a = -123.45_6; print "$a\n";
417 $a = -123.456_; print "$a\n";
418 $a = 123.456E_12; print "$a\n";
419 $a = 123.456E1_2; print "$a\n";
420 $a = 123.456E12_; print "$a\n";
421 $a = 123.456E_+12; print "$a\n";
422 $a = 123.456E+_12; print "$a\n";
423 $a = 123.456E+1_2; print "$a\n";
424 $a = 123.456E+12_; print "$a\n";
425 $a = 123.456E_-12; print "$a\n";
426 $a = 123.456E-_12; print "$a\n";
427 $a = 123.456E-1_2; print "$a\n";
428 $a = 123.456E-12_; print "$a\n";
429 $a = 1__23; print "$a\n";
430 $a = 12.3__4; print "$a\n";
431 $a = 12.34e1__2; print "$a\n";
434 Misplaced _ in number at - line 6.
435 Misplaced _ in number at - line 11.
436 Misplaced _ in number at - line 16.
437 Misplaced _ in number at - line 17.
438 Misplaced _ in number at - line 20.
439 Misplaced _ in number at - line 21.
440 Misplaced _ in number at - line 24.
441 Misplaced _ in number at - line 25.
442 Misplaced _ in number at - line 28.
443 Misplaced _ in number at - line 29.
444 Misplaced _ in number at - line 31.
445 Misplaced _ in number at - line 32.
446 Misplaced _ in number at - line 33.
447 Misplaced _ in number at - line 35.
448 Misplaced _ in number at - line 36.
449 Misplaced _ in number at - line 37.
450 Misplaced _ in number at - line 39.
451 Misplaced _ in number at - line 40.
452 Misplaced _ in number at - line 41.
453 Misplaced _ in number at - line 42.
536 use warnings 'bareword' ;
539 no warnings 'bareword' ;
543 Bareword "FRED::" refers to nonexistent package at bar line 25.
546 use warnings 'ambiguous' ;
549 no warnings 'ambiguous' ;
552 Ambiguous call resolved as CORE::time(), qualify as such or use & at - line 4.
569 Warning: Use of "rand" without parens is ambiguous at - line 2.
575 no warnings 'ambiguous' ;
577 use warnings 'ambiguous' ;
582 Warning: Use of "rand" without parens is ambiguous at - line 3.
583 Warning: Use of "rand" without parens is ambiguous at - line 8.
584 Warning: Use of "rand" without parens is ambiguous at - line 10.
590 Ambiguous use of -fred resolved as -&fred() at - line 3.
597 no warnings 'ambiguous' ;
599 use warnings 'ambiguous' ;
604 Ambiguous use of -fred resolved as -&fred() at - line 4.
605 Ambiguous use of -fred resolved as -&fred() at - line 9.
606 Ambiguous use of -fred resolved as -&fred() at - line 11.
611 Precedence problem: open FOO should be open(FOO) at - line 2.
617 no warnings 'precedence' ;
619 use warnings 'precedence' ;
624 Precedence problem: open FOO should be open(FOO) at - line 3.
625 Precedence problem: open FOO should be open(FOO) at - line 8.
626 Precedence problem: open FOO should be open(FOO) at - line 10.
632 no warnings 'ambiguous' ;
634 use warnings 'ambiguous' ;
639 Operator or semicolon missing before *foo at - line 3.
640 Ambiguous use of * resolved as operator * at - line 3.
641 Operator or semicolon missing before *foo at - line 8.
642 Ambiguous use of * resolved as operator * at - line 8.
643 Operator or semicolon missing before *foo at - line 10.
644 Ambiguous use of * resolved as operator * at - line 10.
647 use warnings 'misc' ;
652 Unrecognized escape \m passed through at - line 3.
655 use warnings 'portable' ;
656 my $a = 0b011111111111111111111111111111110 ;
657 $a = 0b011111111111111111111111111111111 ;
658 $a = 0b111111111111111111111111111111111 ;
665 no warnings 'portable' ;
666 $a = 0b011111111111111111111111111111110 ;
667 $a = 0b011111111111111111111111111111111 ;
668 $a = 0b111111111111111111111111111111111 ;
676 Binary number > 0b11111111111111111111111111111111 non-portable at - line 5.
677 Hexadecimal number > 0xffffffff non-portable at - line 8.
678 Octal number > 037777777777 non-portable at - line 11.
681 use warnings 'overflow' ;
682 my $a = 0b011111111111111111111111111111110 ;
683 $a = 0b011111111111111111111111111111111 ;
684 $a = 0b10000000000000000000000000000000000000000000000000000000000000000 ;
687 $a = 0x10000000000000000 ;
690 $a = 002000000000000000000000;
691 no warnings 'overflow' ;
692 $a = 0b011111111111111111111111111111110 ;
693 $a = 0b011111111111111111111111111111111 ;
694 $a = 0b10000000000000000000000000000000000000000000000000000000000000000 ;
697 $a = 0x10000000000000000 ;
700 $a = 002000000000000000000000;
702 Integer overflow in binary number at - line 5.
703 Integer overflow in hexadecimal number at - line 8.
704 Integer overflow in octal number at - line 11.
712 dump() better written as CORE::dump() at - line 4.
718 sub dump { print "no warning for overriden dump\n"; }
721 no warning for overriden dump
724 use warnings 'ambiguous';
725 "@mjd_previously_unused_array";
726 no warnings 'ambiguous';
727 "@mjd_previously_unused_array";
729 Possible unintended interpolation of @mjd_previously_unused_array in string at - line 3.
732 # The \q should warn, the \_ should NOT warn.
740 Unrecognized escape \q passed through at - line 4.