summaryrefslogtreecommitdiff
path: root/020
diff options
context:
space:
mode:
authorGuillermo Ramos2019-08-06 14:51:56 +0200
committerGuillermo Ramos2019-08-06 14:51:56 +0200
commitda559bb53d8c4d3b46bb7c9f8679f00b9b529c6f (patch)
treee428db770a9abe00910df9353b37eb8565ebc8cb /020
parent15c6b0541a233e593b1870a188a6e06900f5e074 (diff)
downloadperlweekly-da559bb53d8c4d3b46bb7c9f8679f00b9b529c6f.tar.gz
[020#1] Trimmed
Diffstat (limited to '020')
-rwxr-xr-x020/ch1.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/020/ch1.pl b/020/ch1.pl
index 6d8140d..0240d6a 100755
--- a/020/ch1.pl
+++ b/020/ch1.pl
@@ -11,5 +11,5 @@ use warnings;
my $str = shift;
my @chunks;
-push @chunks, $1 while ($str =~ /\G((.)\2*)/g);
+push @chunks, $1 while $str =~ /((.)\2*)/g;
print "@chunks\n";