From: Father Chrysostomos <sprout@cpan.org>
Date: Tue, 13 Dec 2011 22:40:20 +0000 (-0800)
Subject: perldelta: Turn one-liner into a block of code
X-Git-Tag: accepted/trunk/20130322.191538~1765
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=e46b6a3298faa41ef29068aa0bdd9f93fe720887;p=platform%2Fupstream%2Fperl.git

perldelta: Turn one-liner into a block of code

so the line isn’t too long.
---

diff --git a/pod/perldelta.pod b/pod/perldelta.pod
index 63a2da6..2143cd9 100644
--- a/pod/perldelta.pod
+++ b/pod/perldelta.pod
@@ -610,7 +610,12 @@ named captures that weren't matched as part of a regex ever since 5.10
 when they were introduced, e.g. this would consume over a hundred MB
 of memory:
 
-    perl -wle 'for (1..10_000_000) { if ("foo" =~ /(foo|(?<capture>bar))?/) { my $capture = $+{capture} } } system "ps -o rss $$"'
+    for (1..10_000_000) {
+	if ("foo" =~ /(foo|(?<capture>bar))?/) {
+	    my $capture = $+{capture}
+	}
+    }
+    system "ps -o rss $$"'
 
 =item *