Help for this page
colored(scalar @{$trigraphs{$k}}, 'underline'), and colored(scalar keys %{$flanks{$k}}, 'underline')); Note: the last ) is to match the ( in sprintf().
#! /usr/bin/perl use strict; ... FDRJN UHVXX URDMD SKVSO PJRKZ DYFZJ XGSRR VTQYR WDARW DFVRK VDRKV TDFSZ ZDYFR DNNVO VTSXS AWVZR