Im sure (i hope) others will give their interpretation, but here`s a start. Probably will blow-up on the first pass. This is quite a parsing challenge:
Oh yeah, this is kixtart 4.0 (substr)
break on
$filename = "m:\t.dat"
; uncomment for softcopy
; del "out.txt"
; $=redirectoutput("out.txt")
if open(1,$filename) = 0
$line = readline(1)
while @error = 0
if substr($line,2,1) = ":"
$path = $line
else
if $line
$split = instr($line,"\")
if $split = 0
$split = instr($line," ")-1
else
$split = $split + instr(substr($line,$split)," ") - 2
endif
$group = substr($line,1,$split+1)
$access = substr($line,$split+1)
endif
?"$path,$group,$access"
endif
$line = readline(1)
loop
$= close(1)
endif
-Shawn
[ 10 April 2002, 20:32: Message edited by: Shawn ]