Help for this page

Select Code to Download


  1. or download this
    D:\Temp>perl -c -e "if (not defined($pname) && $pname ne '' && defined
    +($policy_ur) && $policy_ur ne '' && not defined($odate) && $odate ne 
    +''){}"
    -e syntax OK
    
  2. or download this
    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 && $polic
    +y_ur ne ''
    ...
        ();
    }
    -e syntax OK