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