summaryrefslogtreecommitdiff
path: root/pod/perlop.pod
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-12-28 03:08:39 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-12-28 03:08:39 +0000
commita7665c5ea62576c158d913778ec5f7158d35f5c4 (patch)
tree8b4f7472ea0f82cb0741d359bac993f9ca5adb6b /pod/perlop.pod
parent0cc436d0c5aebb0d280c57607e70b41c774c0576 (diff)
downloadperl-a7665c5ea62576c158d913778ec5f7158d35f5c4.tar.gz
pod nits from Simon Cozens <simon@brecon.co.uk> and others
p4raw-id: //depot/perl@4720
Diffstat (limited to 'pod/perlop.pod')
-rw-r--r--pod/perlop.pod2
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlop.pod b/pod/perlop.pod
index c430dbc48d..547ee5328e 100644
--- a/pod/perlop.pod
+++ b/pod/perlop.pod
@@ -963,7 +963,7 @@ notably if the result of qr() is used standalone:
my @compiled = map qr/$_/i, @$patterns;
grep {
my $success = 0;
- foreach my $pat @compiled {
+ foreach my $pat (@compiled) {
$success = 1, last if /$pat/;
}
$success;