use Text::Abbrev;

%hash = ();
abbrev(*hash, LIST);