lettercount-unicode « perl6 « arne-sommer « challenge-033 - github/perlweeklychallenge-club.git - Unnamed repository; edit this file 'description' to name the repository.

about summary refs log tree commit diff

path: root/challenge-033/arne-sommer/perl6/lettercount-unicode

blob: b337f49949049b8b7b000d4691936a1540cfc5e9 (plain)

#! /usr/bin/env raku

my %result = $*ARGFILES.comb>>.lc.grep(* ~~ /<:L>/).Bag;

for %result.keys.sort -> $key
{
  say "$key: %result{$key}";
}