in reply to Re: forks.pm, CGI::App,TT and DBD::mysql
in thread forks.pm, CGI::App,TT and DBD::mysql
#!/usr/bin/perl -w
# forks_test.pl
use forks;
my $pid = open(CLI, "$ENV{HOME}/bin/cli all -D |") or die "couldn't fork: $!\n";
my $output = '';
while(<CLI>) {
#chomp($_);
if ($_ =~ /\w+.*/) {
$output .= $_;
print "$_\n";
} else {
}
}
close(CLI);
[prompt> ./forks_test.pl
cat: write error: Broken pipe
Any ideas out there about this one? I am using perl 5.8.5 on a RH9 linux box.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^3: forks.pm, CGI::App,TT and DBD::mysql
by BrowserUk (Patriarch) on Jul 30, 2004 at 23:54 UTC | |
by perldragon80 (Sexton) on Jul 31, 2004 at 04:06 UTC | |
by BrowserUk (Patriarch) on Jul 31, 2004 at 05:06 UTC |