in reply to Problem with hash
kyle gives excellent advice. I would also check that $statuss is defined before assigning it to your hash otherwise you'll get an 'undefined' warning when you later access that key.
s//----->\t/;$~="JAPH";s//\r<$~~/;{s|~$~-|-~$~|||s |-$~~|$~~-|||s,<$~~,<~$~,,s,~$~>,$~~>,, $|=1,select$,,$,,$,,1e-1;print;redo}
|
---|
In Section
Seekers of Perl Wisdom