Thank you for support regarding this question! One other question regarding this, do you think it would help solve this trouble to have the Expect code written in Perl? The current Expect code is the original stuff and is not the Perl version. | [reply] |
Are you talking about Don Libes' Expect written in Tcl? The picture I'm begining to get is of a Perl script calling a Tcl script which causes a dump to STDOUT. Is this correct? The problem then would be in the character based handling of a file instead of a protocol more appropriate for transfering large files over high latency links. The language the scripting is written in is not an issue. The first thing I would do would be to rewrite the Expect script to use FTP instead of a dump to STDOUT.
Playing with nice and such won't do you any good as much of the time is being spent in doing I/O and the OS sees the activity in STDIO and overides the priority.
s//----->\t/;$~="JAPH";s//\r<$~~/;{s|~$~-|-~$~|||s
|-$~~|$~~-|||s,<$~~,<~$~,,s,~$~>,$~~>,,
$|=1,select$,,$,,$,,1e-1;print;redo}
| [reply] |