aoc2015

Advent of Code 2015 solutions in Perl.
git clone git://git.samirparikh.com/aoc2015
Log | Files | Refs | README

day11.pl (328B) - raw

      1 #!/usr/local/bin/perl
      2 # day 2015-11
      3 
      4 use strict;
      5 use warnings;
      6 use v5.32;
      7 use lib '.';
      8 use Day11 qw( is_valid_password );
      9 
     10 my $password = 'hepxcrrq';
     11 
     12 do { $password++ } until ( is_valid_password( $password ) );
     13 say "part 1: ", $password;
     14 
     15 do { $password++ } until ( is_valid_password( $password ) );
     16 say "part 2: ", $password;