chomp($prompt{$passwds{$prompt}} = <STDIN>);

##</code><code>##

%prompt = (
   '$oldpass'   = 'whatever I typed for old password',
   '$oldenable' = 'whatever I typed for old enable,
   ...
);