Help for this page
my %inst = ( "unimp" => "\e[31munimp\e[0m", ... "call" => "\e[31mcall\e[0m", "jmp" => "\e[31mjmp\e[0m", );
s/(^.*<)\:([a-z]+)>/$1$inst{$2}/;
"default" => "\e[31m$the_key\e[0m",