3 "my" variable %s masks earlier declaration in same scope
7 Variable "%s" may be unavailable
15 Variable "%s" will not stay shared
23 Found = in conditional, should be ==
26 Use of implicit split to @_ is deprecated
29 Use of implicit split to @_ is deprecated
32 Useless use of time in void context
33 Useless use of a variable in void context
34 Useless use of a constant in void context
39 Applying %s to %s will act on scalar(%s)
40 my $a ; my @a = () ; my %a = () ; my $b = \@a ; my $c = \%a ;
55 Parentheses missing around "my" list at -e line 1.
58 Parentheses missing around "local" list at -e line 1.
61 Probable precedence problem on logical or at -e line 1.
62 use warning 'syntax'; my $x = print(ABC || 1);
64 Value of %s may be \"0\"; use \"defined\"
66 $x = 1 while $x = <FH> ;
68 Subroutine fred redefined at -e line 1.
69 sub fred{1;} sub fred{1;}
71 Constant subroutine %s redefined
72 sub fred() {1;} sub fred() {1;}
74 Format FRED redefined at /tmp/x line 5.
80 Array @%s missing the @ in argument %d of %s()
83 Hash %%%s missing the %% in argument %d of %s()
86 Statement unlikely to be reached
87 (Maybe you meant system() when you said exec()?
90 defined(@array) is deprecated
91 (Maybe you should just omit the defined()?)
94 defined (@a = (1,2,3)) ;
96 defined(%hash) is deprecated
97 (Maybe you should just omit the defined()?)
103 use warning 'unsafe' ;
107 "my" variable $x masks earlier declaration in same scope at - line 4.
110 use warning 'unsafe' ;
118 Variable "$x" will not stay shared at - line 7.
121 use warning 'unsafe' ;
129 Variable "$x" may be unavailable at - line 6.
132 use warning 'syntax' ;
135 Found = in conditional, should be == at - line 3.
138 use warning 'deprecated' ;
141 Use of implicit split to @_ is deprecated at - line 3.
144 use warning 'deprecated' ;
147 Use of implicit split to @_ is deprecated at - line 3.
150 use warning 'void' ; close STDIN ;
153 wantarray ; # OP_WANTARRAY
163 defined $a ; # OP_DEFINED
166 length $a ; # OP_LENGTH
167 substr $a,1 ; # OP_SUBSTR
168 vec $a,1,2 ; # OP_VEC
169 index $a,1,2 ; # OP_INDEX
170 rindex $a,1,2 ; # OP_RINDEX
171 sprintf $a ; # OP_SPRINTF
175 #values %a ; # OP_VALUES
179 unpack "a", "a" ; # OP_UNPACK
180 pack $a,"" ; # OP_PACK
182 (@a)[0,1] ; # OP_LSLICE
185 sort(1,2) ; # OP_SORT
186 reverse(1,2) ; # OP_REVERSE
191 fileno STDIN ; # OP_FILENO
193 tell STDIN ; # OP_TELL
194 readlink 1; # OP_READLINK
196 localtime ; # OP_LOCALTIME
198 eval { getgrnam 1 }; # OP_GGRNAM
199 eval { getgrgid 1 }; # OP_GGRGID
200 eval { getpwnam 1 }; # OP_GPWNAM
201 eval { getpwuid 1 }; # OP_GPWUID
203 Useless use of repeat in void context at - line 3.
204 Useless use of wantarray in void context at - line 5.
205 Useless use of reference-type operator in void context at - line 12.
206 Useless use of reference constructor in void context at - line 13.
207 Useless use of scalar ref constructor in void context at - line 14.
208 Useless use of defined operator in void context at - line 15.
209 Useless use of hex in void context at - line 16.
210 Useless use of oct in void context at - line 17.
211 Useless use of length in void context at - line 18.
212 Useless use of substr in void context at - line 19.
213 Useless use of vec in void context at - line 20.
214 Useless use of index in void context at - line 21.
215 Useless use of rindex in void context at - line 22.
216 Useless use of sprintf in void context at - line 23.
217 Useless use of array element in void context at - line 24.
218 Useless use of array slice in void context at - line 26.
219 Useless use of hash elem in void context at - line 29.
220 Useless use of hash slice in void context at - line 30.
221 Useless use of unpack in void context at - line 31.
222 Useless use of pack in void context at - line 32.
223 Useless use of join in void context at - line 33.
224 Useless use of list slice in void context at - line 34.
225 Useless use of sort in void context at - line 37.
226 Useless use of reverse in void context at - line 38.
227 Useless use of range (or flop) in void context at - line 41.
228 Useless use of caller in void context at - line 42.
229 Useless use of fileno in void context at - line 43.
230 Useless use of eof in void context at - line 44.
231 Useless use of tell in void context at - line 45.
232 Useless use of readlink in void context at - line 46.
233 Useless use of time in void context at - line 47.
234 Useless use of localtime in void context at - line 48.
235 Useless use of gmtime in void context at - line 49.
236 Useless use of getgrnam in void context at - line 50.
237 Useless use of getgrgid in void context at - line 51.
238 Useless use of getpwnam in void context at - line 52.
239 Useless use of getpwuid in void context at - line 53.
243 for (@{[0]}) { "$_" } # check warning isn't duplicated
245 Useless use of string in void context at - line 3.
251 if ( ! $Config{d_telldir}) {
254 # telldir not present
259 telldir 1 ; # OP_TELLDIR
261 Useless use of telldir in void context at - line 13.
267 if ( ! $Config{d_getppid}) {
270 # getppid not present
275 getppid ; # OP_GETPPID
277 Useless use of getppid in void context at - line 13.
283 if ( ! $Config{d_getpgrp}) {
286 # getpgrp not present
291 getpgrp ; # OP_GETPGRP
293 Useless use of getpgrp in void context at - line 13.
299 if ( ! $Config{d_times}) {
309 Useless use of times in void context at - line 13.
315 if ( ! $Config{d_getprior} or $^O eq 'os2') { # Locks before fixpak22
318 # getpriority not present
323 getpriority 1,2; # OP_GETPRIORITY
325 Useless use of getpriority in void context at - line 13.
331 if ( ! $Config{d_getlogin}) {
334 # getlogin not present
339 getlogin ; # OP_GETLOGIN
341 Useless use of getlogin in void context at - line 13.
346 if ( ! $Config{d_socket}) {
349 # getsockname not present
350 # getpeername not present
351 # gethostbyname not present
352 # gethostbyaddr not present
353 # gethostent not present
354 # getnetbyname not present
355 # getnetbyaddr not present
356 # getnetent not present
357 # getprotobyname not present
358 # getprotobynumber not present
359 # getprotoent not present
360 # getservbyname not present
361 # getservbyport not present
362 # getservent not present
366 getsockname STDIN ; # OP_GETSOCKNAME
367 getpeername STDIN ; # OP_GETPEERNAME
368 gethostbyname 1 ; # OP_GHBYNAME
369 gethostbyaddr 1,2; # OP_GHBYADDR
370 gethostent ; # OP_GHOSTENT
371 getnetbyname 1 ; # OP_GNBYNAME
372 getnetbyaddr 1,2 ; # OP_GNBYADDR
373 getnetent ; # OP_GNETENT
374 getprotobyname 1; # OP_GPBYNAME
375 getprotobynumber 1; # OP_GPBYNUMBER
376 getprotoent ; # OP_GPROTOENT
377 getservbyname 1,2; # OP_GSBYNAME
378 getservbyport 1,2; # OP_GSBYPORT
379 getservent ; # OP_GSERVENT
381 # some functions may not be there, so we exit without running
385 Useless use of getsockname in void context at - line 24.
386 Useless use of getpeername in void context at - line 25.
387 Useless use of gethostbyname in void context at - line 26.
388 Useless use of gethostbyaddr in void context at - line 27.
389 Useless use of gethostent in void context at - line 28.
390 Useless use of getnetbyname in void context at - line 29.
391 Useless use of getnetbyaddr in void context at - line 30.
392 Useless use of getnetent in void context at - line 31.
393 Useless use of getprotobyname in void context at - line 32.
394 Useless use of getprotobynumber in void context at - line 33.
395 Useless use of getprotoent in void context at - line 34.
396 Useless use of getservbyname in void context at - line 35.
397 Useless use of getservbyport in void context at - line 36.
398 Useless use of getservent in void context at - line 37.
407 Useless use of a variable in void context at - line 3.
408 Useless use of a variable in void context at - line 4.
409 Useless use of a variable in void context at - line 5.
410 Useless use of a variable in void context at - line 6.
417 Useless use of a constant in void context at - line 3.
418 Useless use of a constant in void context at - line 4.
421 use warning 'unsafe' ;
422 my $a ; my @a = () ; my %a = () ; my $b = \@a ; my $c = \%a ;
436 Applying pattern match to @array will act on scalar(@array) at - line 4.
437 Applying substitution to @array will act on scalar(@array) at - line 5.
438 Can't modify private array in substitution at - line 5, near "s/a/b/ ;"
439 Applying character translation to @array will act on scalar(@array) at - line 6.
440 Applying pattern match to @array will act on scalar(@array) at - line 7.
441 Applying substitution to @array will act on scalar(@array) at - line 8.
442 Applying character translation to @array will act on scalar(@array) at - line 9.
443 Applying pattern match to %hash will act on scalar(%hash) at - line 10.
444 Applying substitution to %hash will act on scalar(%hash) at - line 11.
445 Applying character translation to %hash will act on scalar(%hash) at - line 12.
446 Applying pattern match to %hash will act on scalar(%hash) at - line 13.
447 Applying substitution to %hash will act on scalar(%hash) at - line 14.
448 Applying character translation to %hash will act on scalar(%hash) at - line 15.
449 Execution of - aborted due to compilation errors.
452 use warning 'syntax' ;
455 Parentheses missing around "my" list at - line 3.
458 use warning 'syntax' ;
459 local $a, $b = (1,2);
461 Parentheses missing around "local" list at - line 3.
464 use warning 'syntax' ;
467 Probable precedence problem on logical or at - line 3.
473 use warning 'unsafe' ;
475 $x = 1 if $x = <FH> ;
477 Value of <HANDLE> construct can be "0"; test with defined() at - line 4.
480 use warning 'unsafe' ;
482 $x = 1 if $x = readdir FH ;
485 Value of readdir() operator can be "0"; test with defined() at - line 4.
488 use warning 'unsafe' ;
491 Value of glob construct can be "0"; test with defined() at - line 3.
494 use warning 'unsafe' ;
496 $x = 1 if $x = each %a ;
498 Value of each() operator can be "0"; test with defined() at - line 4.
501 use warning 'unsafe' ;
502 $x = 1 while $x = <*> and 0 ;
504 Value of glob construct can be "0"; test with defined() at - line 3.
507 use warning 'unsafe' ;
509 $x = 1 while $x = readdir FH and 0 ;
512 Value of readdir() operator can be "0"; test with defined() at - line 4.
515 use warning 'redefine' ;
519 Subroutine fred redefined at - line 4.
522 use warning 'redefine' ;
526 Constant subroutine fred redefined at - line 4.
529 use warning 'redefine' ;
535 Format FRED redefined at - line 5.
538 use warning 'syntax' ;
541 Array @FRED missing the @ in argument 1 of push() at - line 3.
544 use warning 'syntax' ;
547 Hash %FRED missing the % in argument 1 of keys() at - line 3.
550 use warning 'syntax' ;
554 Statement unlikely to be reached at - line 4.
555 (Maybe you meant system() when you said exec()?)
558 use warning 'deprecated' ;
561 defined(@array) is deprecated at - line 3.
562 (Maybe you should just omit the defined()?)
565 use warning 'deprecated' ;
568 defined(@array) is deprecated at - line 3.
569 (Maybe you should just omit the defined()?)
572 use warning 'deprecated' ;
573 defined(@a = (1,2,3));
575 defined(@array) is deprecated at - line 3.
576 (Maybe you should just omit the defined()?)
579 use warning 'deprecated' ;
582 defined(%hash) is deprecated at - line 3.
583 (Maybe you should just omit the defined()?)
586 use warning 'deprecated' ;
589 defined(%hash) is deprecated at - line 3.
590 (Maybe you should just omit the defined()?)