[sf-perl] Hanging with the diamond operator?
gatorreina at gmail.com
Tue Jan 8 13:54:20 PST 2008
Thank you very much for your reply. The file is called from a couple
different scripts in one of the the following ways:
with a file (in which case a file is submitted that needs to be
checked for "epsf[". In these cases the sub sometimes hangs
&delimit($T, $C, $R, $S, $B, $file);
or w/o a file so the scalar $B will be the $body that winds up in the
delimited file. In these cases while(<>) is never executed and the
program never hangs.
&delimit($T, $C, $R, $S, $B);
It is trimmed down significantly chiefly because it is on a private
network and it's a lot to retype. The only thing that happens after
the while loop is that a new file is created containing delimiters in
which the scalar $body is one of the delimited fields. The file is
then rsynced to another local machine.
Thanks for the help thus far.
On 1/8/08, Joe Brenner <doom at kzsu.stanford.edu> wrote:
> Richard Reina <gatorreina at gmail.com> wrote:
> > The script below is called from another perl script that runs on linux
> > console on a few machines here. The problem is that sometimes the
> > script hangs.
> How do you call the script? Everything inside it is inside a
> subroutine called "delmit", and nothing here calls the sub.
> Either you've trimmed this down radically from the real script,
> and/or it isn't really a "script", but a code library...
> SanFrancisco-pm mailing list
> SanFrancisco-pm at pm.org
More information about the SanFrancisco-pm