@dict{ map uc, grep /[aeiouy]/, map /^([a-z]{5})$/, <$FH> } = ();