|
Yes, it's me again. I've got it almost figured out so here's already a bit of the code.
open(1,"f:\temp\test\properset\strip-shares.txt",5) open(2, "f:\temp\test\properset\detect.txt") $line = readline(2) while @ERROR = 0 $MyArray = split($line,"$") WriteLine( 1 , $myarray[0] + @CRLF) $line = readline(2) loop close(1) close(2)
The reason why i am using an array in there is that the sourcefile contains an input similar to this one
' ' 'Share name Resource Remark' ' ' '-------------------------------------------------------------------------------' user$ z:\path\user text 'The command completed successfully.'
As a result i'll get
' ' 'Share name Resource Remark' ' ' '-------------------------------------------------------------------------------' user 'The command completed successfully.'
Note that the stuff in bold is some left over garbage which i would like to delete. Since it's friday evening over here i'm a bit tired and am again suffering from writers block. If anyone knows a genious trick of kicking out those garbage lines from my result file i would appreciate it. So the lines i want to get rid off are always lines 1-4 and the last line.
Thanks to all who 've helped me untill now.
|