[32253] in Perl-Users-Digest
Perl-Users Digest, Issue: 3520 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Oct 16 06:09:18 2011
Date: Sun, 16 Oct 2011 03:09:03 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 16 Oct 2011 Volume: 11 Number: 3520
Today's topics:
help with pipe <bjlockie@lockie.ca>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 16 Oct 2011 00:57:26 -0700 (PDT)
From: bjlockie <bjlockie@lockie.ca>
Subject: help with pipe
Message-Id: <ef4db1a3-8b07-4fb8-99b7-9112cb2273d8@z26g2000yqh.googlegroups.com>
Create ./channels.conf with the single line:
CBC:539000000:8VSB:49:52:3
This code never gets to 'here3'.
I think because the command ping never finishes (ping is an example
command, there are no switches to make the real command stop).
I've seen similar code working elsewhere.
my $cmd = 'ping google.ca >/dev/null |';
open( ZAP, $cmd ) || die "can't fork: $!";
print $cmd . "\n";
print "here2\n";
while (my $line = <ZAP>) {
print $line;
}
print "here3\n";
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V11 Issue 3520
***************************************
