%Hidlabels = {3333=>1, 4444=>2, 2222=>3}; $formula =~ s/f(\d+)/$Hidlabels{$1}/ge;