HTTP/2 200 cache-control: max-age=43200 server: Combust/Plack (Perl) vary: Accept-Encoding content-encoding: gzip content-length: 1432 content-type: text/html; charset=utf-8 last-modified: Sat, 11 Oct 2025 15:51:51 GMT traceparent: 7945cbc92677df7da43b25e53c943e35 strict-transport-security: max-age=15768000 Front page | perl.perl5.porters | Postings from July 2008

[perl #56530] <variable> used only once: possible typo

Thread Next

# New Ticket Created by  Toralf Förster 
# Please include the string:  [perl #56530]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=56530 >
The following one-liner shouldn't produce that warning, isn't it ? :
tfoerste@n22 ~ $ seq 1 7 | perl -we 'while (<STDIN>) { print "line break\n" if ($counter++ % 3 == 0); print }'
Name "main::counter" used only once: possible typo at -e line 1.
line break
1
2
3
line break
4
5
6
line break
7
tfoerste@n22 ~ $ perl -v
This is perl, v5.8.8 built for i686-linux
Copyright 1987-2006, Larry Wall
-- 
MfG/Sincerely
Toralf Förster
pgp finger print: 7B1A 07F4 EC82 0F90 D4C2 8936 872A E508 7DB6 9DA3

Thread Next

• [perl #56530] <variable> used only once: possible typo by Toralf Förster
• Re: [perl #56530] <variable> used only once: possible typo by Steve Peters