my $passwordwidget = My::UserPassword->new($manwindow,%args); my ($user,$passwd) = $passwordwidget->Show(); print "User:\t\t$user\nPassword:\t$passwd\n";