RosettaCodeData/Task/Execute-a-system-command/ALGOL-68/execute-a-system-command-2.alg
2023-07-01 13:44:08 -04:00

5 lines
162 B
Text

OP ! = (STRING cmd)BOOL: system(cmd) = 0;
IF ! "touch test.tmp" ANDF ( ! "ls test.tmp" ANDF ! "rm test.tmp" ) THEN
print (("test.tmp now gone!", new line))
FI