[~]$ perl -MData::Dumper -e '%user_passwd = ("a07jonka" => {"P1","hejsan"}, "a08karli" => {"P1","svejsan","P2","zvejzan"});  print Dumper \%user_passwd'
$VAR1 = {
          'a07jonka' => {
                          'P1' => 'hejsan'
                        },
          'a08karli' => {
                          'P2' => 'zvejzan',
                          'P1' => 'svejsan'
                        }
        };