rm_one.com

来自「GhostScript的源代码」· COM 代码 · 共 10 行

$ Verif = F$Verify(0)
$ ! OpenVMS command file to emulate behavior of:
$ !
$ !     Define the command for deleting (a) file(s) (including wild cards)
$ !
$ DELETE="DELETE$$$/LOG"
$ FILE = F$SEARCH("''P1'")
$ IF "''FILE'" .NES. "" THEN DELETE 'FILE'
$ xxx = F$Verify(Verif)