- Removed solution by Nick Tonkin.

3 files changed, 0 insertions, 32 deletions

diff --git a/challenge-048/1nickt/README b/challenge-048/1nickt/README
deleted file mode 100644
index 539f10b14a..0000000000
--- a/challenge-048/1nickt/README
+++ /dev/null
@@ -1 +0,0 @@
-Solutions by Nick Tonkin.
diff --git a/challenge-048/1nickt/perl/ch-1.pl b/challenge-048/1nickt/perl/ch-1.pl
deleted file mode 100644
index 3c0576daa8..0000000000
--- a/challenge-048/1nickt/perl/ch-1.pl
+++ /dev/null
@@ -1,11 +0,0 @@
-use strict;
-use warnings;
-
-my @position = (1..50);
-
-until (@position == 1) {
-    splice @position, 1, 1;
-    push @position, shift @position;
-}
-
-print "Survivor started in position @position";
diff --git a/challenge-048/1nickt/perl/ch-2.pl b/challenge-048/1nickt/perl/ch-2.pl
deleted file mode 100644
index dc6bfc751f..0000000000
--- a/challenge-048/1nickt/perl/ch-2.pl
+++ /dev/null
@@ -1,20 +0,0 @@
-use strict;
-use warnings;
-use DateTime::Set;
-
-# Date cannot be higher than 31; thus year must be lower than 2300
-my $end   = DateTime->new({ year => 2299, month => 12, day => 31 });
-my $start = $end->clone->add( days => 1 )->set_year('2000');
-
-my $dates = DateTime::Set->from_recurrence(
-    start      => $start,
-    end        => $end,
-    recurrence => sub { shift->add( days => 1 ) },
-);
-
-my $iter = $dates->iterator;
-
-while ( defined(my $date = $iter->next) ) {
-    my $us_format = $date->strftime('%m%d%Y');
-    print "$us_format\n" if $us_format eq reverse $us_format;
-}