Help for this page
if (not defined($pname) && $pname ne ''){
if (not (defined($pname) && $pname ne '')){
if ((not defined($pname)) && $pname ne ''){
if (!defined($pname) || $pname eq ''){