if (not defined($pname) && $pname ne ''){