D:\Temp>perl -MO=Deparse,p -e "if (not defined($pname) && pname ne '' && defined($policy_ur) && $policy_ur ne '' && not defined($odate) && $odate ne ''){}"
if (not defined $pname && $pname ne '' && defined $policy_ur && $policy_ur ne ''
 && !(defined $odate && $odate ne '')) {
    ();
}
-e syntax OK