> > The following script is written in expect, an extension to the TCL
> > language:
>
> These will, I think, be great, but someone's mailer as munched some
> important things along the way.
That would be mine, I love pine. Sorry about the mix up.
> I was able to fix up the lines with missing quotes and semicolons,
There should be nothing missing, just extra CR's inserted.
> but if you could send me the full pattern
> so I don't have to reverse engineer your work (especially hard, having
> never seen the output) for:
I have also included some sample output.
> > $complete_line[ $position2 ] = $_;
> > if(
> > /(^S(\d+)\s+([0-9a-zA-Z\-_=]+)\s+[0-9a-zA-Z\-_.]+\s+[a-zA-Z0-9\/]+\s+\w
> > {
I think the best solution is to put these scripts on an FTP server. I
have gotten at least five similair request for these in the last eleven
hours so I have cleaned them up, added a README with instructions,
copyrighted them with the GNU GPL, and placed them on my FTP server. They
are freely downloadable via anonymous FTP at:
ftp://ftp.chaffee.net/pub/portmaster
Once again Expect is an INCREDIBLE language that will enable you to
automate ANY repetitive action with ANY program (including those that
require passwords and do strange things to your terminal while waiting to
receive it). It also has a learning mode that makes to EXTREMLY easy to
use.
Tres
tres@chaffee.net
--If you think it to be idiot proof,
then you haven't met the "Latest 'n Greatest" idiot!