I have a program that I wrote which take input from a pipe and then distributes to
certain log files.
What happens is that for no particular reason that I can find, the program dies.
What do I put in to find out what killed it or what it died from?
#!/usr/bin/perl
open (KERNFIFO, "cat /dev/log.fifo |");
while ( <KERNFIFO> ) {
if ( /fbd_ioctl/ ){
#print "Skipping line... $_";
}
elsif ( /\bslot/ ) {
$cards = $_;
`echo "$cards" >> /var/log/cards/messages`;
}
else {
$line = $_;
`echo "$line" >> /var/log/messages`;
}
}
Rick Parker
Motorola Inc. / Winphoria Division
3 Highwood Drive, WEST
Tewksbury, MA 01876
(978) 805-5686
[EMAIL PROTECTED]
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.690 / Virus Database: 451 - Release Date: 5/22/2004
