File: rm_all.com

package info (click to toggle)
ghostscript 10.0.0~dfsg-11%2Bdeb12u7
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 98,252 kB
  • sloc: ansic: 891,828; python: 7,649; cpp: 6,493; cs: 6,209; sh: 6,043; java: 4,028; perl: 2,372; tcl: 1,639; makefile: 521; awk: 66; javascript: 43; yacc: 18
file content (15 lines) | stat: -rw-r--r-- 603 bytes parent folder | download | duplicates (26) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
$ Verif = F$Verify(0)
$ ! OpenVMS command file to emulate behavior of:
$ !
$ !      Define the command for deleting multiple files / patterns
$ !
$ DELETE="DELETE$$$/LOG"
$ IF F$SEARCH("''P1'") .NES. "" THEN DELETE 'P1';*
$ IF F$SEARCH("''P2'") .NES. "" THEN DELETE 'P2';*
$ IF F$SEARCH("''P3'") .NES. "" THEN DELETE 'P3';*
$ IF F$SEARCH("''P4'") .NES. "" THEN DELETE 'P4';*
$ IF F$SEARCH("''P5'") .NES. "" THEN DELETE 'P5';*
$ IF F$SEARCH("''P6'") .NES. "" THEN DELETE 'P6';*
$ IF F$SEARCH("''P7'") .NES. "" THEN DELETE 'P7';*
$ IF F$SEARCH("''P8'") .NES. "" THEN DELETE 'P8';*
$ xxx = F$Verify(Verif)