Ask HN: Why hasn't Perl 6 taken off yet?

  Reading from a file:

  #Efficiently line by line for STDIN
  for lines() -> $line {
      $line.say;
  }

  #Get everything in RAM right now
  my $string = "filename".IO.slurp;

  #Lazy list will do IO as you request into the list
  my @lines = "filename".IO.lines;

  #Listing of directories if the path is a directory
  my @directories = "coolstuff".IO.dir if "coolstuff".IO.d;

  Playing with dates:

  #Get a DateTime for right now
  my $date = DateTime.now;

  #Does what it says on the tin
  say "Yippee" if $date.later(:5years).is-leap-year;

    use Data::Random:from<Perl5> <:all>

    use DBI:from<Perl5>;

    my $dbh = DBI.connect('dbi:Pg:database=test');
    my $products = $dbh.selectall_arrayref(
        'select * from products', {Slice => {}}
    );

  for 'dict.txt'.IO.words -> $word {
        say "$word probably rhymes with Perl"
            if $word ~~ /[ea?|u|i] rl $/;
  
        say "$word is a palindrome"
            if $word eq $word.flip;
    }