If a do this way
#get input
my(%input) = &ReadParse();
I am not getting the values of $loginame and $p_word.