1$ Verif = F$Verify(0) 2$ ! OpenVMS command file to emulate behavior of: 3$ ! 4$ ! Define the command for deleting multiple files / patterns 5$ ! 6$ DELETE="DELETE$$$/LOG" 7$ IF F$SEARCH("''P1'") .NES. "" THEN DELETE 'P1';* 8$ IF F$SEARCH("''P2'") .NES. "" THEN DELETE 'P2';* 9$ IF F$SEARCH("''P3'") .NES. "" THEN DELETE 'P3';* 10$ IF F$SEARCH("''P4'") .NES. "" THEN DELETE 'P4';* 11$ IF F$SEARCH("''P5'") .NES. "" THEN DELETE 'P5';* 12$ IF F$SEARCH("''P6'") .NES. "" THEN DELETE 'P6';* 13$ IF F$SEARCH("''P7'") .NES. "" THEN DELETE 'P7';* 14$ IF F$SEARCH("''P8'") .NES. "" THEN DELETE 'P8';* 15$ xxx = F$Verify(Verif) 16