push @line,
              " " x ( 2 - length scalar @{ $trigraphs{$k} } )
              . colored( scalar @{ $trigraphs{$k} },   'underline' )
              . colored( $k,                           'underline' )
              . colored( scalar keys %{ $flanks{$k} }, 'underline' )
              . " " x ( 2 - length scalar keys %{ $flanks{$k} } );