Year 2015

[aoc.git] / 2015 / 08.pl

diff --git a/2015/08.pl b/2015/08.pl
new file mode 100755 (executable)
index 0000000..9067d2c
--- /dev/null
+++ b/2015/08.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/perl -w
+
+use v5.16;
+use strict;
+
+use Digest::MD5 qw(md5_hex);
+
+my $in = 'ckczppom';
+my $num = 0;
+$num++ while md5_hex("$in$num") !~ /^000000/;
+
+say $num;
+