From: pancho@pancho.name <pancho@pancho.name>
Date: Fri, 21 Mar 2008 03:31:04 +0000 (-0700)
Subject: [perl #51964] Typo on regular expression at perlopentut manual page.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0c42fe95656e99f238a0bcf90ab2476c175615b7;p=p5sagit%2Fp5-mst-13.2.git

[perl #51964] Typo on regular expression at perlopentut manual page.
From: pancho@pancho.name (via RT) <perlbug-followup@perl.org>
Message-ID: <rt-3.6.HEAD-25460-1206095463-311.51964-75-0@perl.org>

p4raw-id: //depot/perl@33559
---

diff --git a/pod/perlopentut.pod b/pod/perlopentut.pod
index 18bc369..566ba0f 100644
--- a/pod/perlopentut.pod
+++ b/pod/perlopentut.pod
@@ -307,7 +307,7 @@ One of the more interesting applications is to change files of a certain
 name into pipes.  For example, to autoprocess gzipped or compressed
 files by decompressing them with I<gzip>:
 
-    @ARGV = map { /^\.(gz|Z)$/ ? "gzip -dc $_ |" : $_  } @ARGV;
+    @ARGV = map { /\.(gz|Z)$/ ? "gzip -dc $_ |" : $_  } @ARGV;
 
 Or, if you have the I<GET> program installed from LWP,
 you can fetch URLs before processing them: