> (set 'file (open ((main-args) 2) "read"))
> (set 'counter 0)
> (while (read-line file)
> (set 'temp (replace {(.*')(\d)} (current-line) (string $1 (inc
> 'counter)) 0 ))
> (println (set 'l (replace {(\S*)(\s*)(=.*)} temp (string $1 (dup "
> " (- 12 (length $1))) $3 ) 0 ))))
> (exit)How do I install this? -- ------------------------------------------------------------- Scott Haneda Tel: 415.898.2602 <http://www.newgeo.com> Novato, CA U.S.A. -- ------------------------------------------------------------------ Have a feature request? Not sure the software's working correctly? If so, please send mail to <[EMAIL PROTECTED]>, not to the list. List FAQ: <http://www.barebones.com/support/lists/bbedit_talk.shtml> List archives: <http://www.listsearch.com/BBEditTalk.lasso> To unsubscribe, send mail to: <[EMAIL PROTECTED]>
