day10

2017-12-04 20:20:16 -05:00 · 2017-12-04 20:20:16 -05:00 · 2ff861dc6d
parent dbd9e653a0
commit 2ff861dc6d
3 changed files with 23 additions and 0 deletions
--- a/2015/10/input
+++ b/2015/10/input
@ -0,0 +1 @@
+1113122113
--- a/2015/10/repeat.pl
+++ b/2015/10/repeat.pl
@ -0,0 +1,12 @@
+use 5.20.0;
+
+my $s = <>;
+chomp $s;
+say $s;
+
+
+$s =~ s/(.)\1*/ length($&) . $1 /eg for 1..40;
+
+say $s;
+say length $s;
+
--- a/2015/10/repeat2.pl
+++ b/2015/10/repeat2.pl
@ -0,0 +1,10 @@
+use 5.20.0;
+
+my $s = <>;
+chomp $s;
+say $s;
+
+$s =~ s/(.)\1*/ length($&) . $1 /eg for 1..50;
+
+say length $s;
+