in reply to Regexs on Hash Keys

A slight simplification:
/^redirect_(.*)/s and $fdat{$1} = $fdat{$_} for keys %fdat;

-- Randal L. Schwartz, Perl hacker