home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / DEMOS / UB_68020.LZH / rm.b < prev    next >
Text File  |  1996-05-06  |  455b  |  23 lines
  1. * "quick and dirty" rm program for use with UniBasic Compiler
  2. *
  3.  dim filename:string[12]
  4.  on error goto badfile
  5. lp
  6.  filename=NextArg
  7.  if len(filename)=0 then
  8.      end
  9.  endif
  10.  if filename="-?" or filename="--help" then
  11.      print
  12.      print "rm filename... filename"
  13.      print
  14.      print "remove (delete) filename(s) from disk"
  15.      print
  16.      end
  17.  endif
  18.  delete filename
  19.  goto lp
  20. badfile
  21.  print "cannot remove ";filename
  22.  print "cannot remove ";filename
  23.