X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperlopentut.pod;h=566ba0f7217d1363b49ed42bc7e9b3fc71f3d725;hb=91a462243ea69db634187747c3ddad662e832e86;hp=18bc369bb45a09c1bbda18a6c5de6d8e3c199654;hpb=740d4bb23b722729f87a23733be98429529fd900;p=p5sagit%2Fp5-mst-13.2.git

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: