diff --git a/2015/10/repeat.pl b/2015/10/repeat.pl
new file mode 100644
index 0000000..bcc8a8f
--- /dev/null
+++ 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;
+
diff --git a/2015/10/repeat2.pl b/2015/10/repeat2.pl
new file mode 100644
index 0000000..6fc7cda
--- /dev/null
+++ 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;
+