in reply to A little bit of help with hashes... (once again :) )

TIMTOWTDI...

my $fields; @$fields{qw( username password )} = @Login{qw( username password )};
Are you sure that you actually need to get rid of the extra key/value pair, though?

-sauoq
"My two cents aren't worth a dime.";