in reply to Net::IRC and File::Tail

You could use the tie example from the File::Tail doc - that looks as if it produces a file handle.

Perl 6 in German

Replies are listed 'Best First'.
Re^2: Net::IRC and File::Tail
by naez (Initiate) on Aug 16, 2007 at 09:45 UTC
    THanks. now the error has gone away and the addfh processed fine.
    However when I add a textstring to the end of my logfile (which I tail)
    the event is NOT triggered.. which I think it should be
    Any other suggestions?
[reply]

      I'm not sure that Net::IRC, resp. IO::Select (which is what Net::IRC uses) work well with tie'd filehandles. A possibly working approach could be to actually use the unix tail command and to read from that filehandle:

      open my $log, "-|", 'tail', '-f', $logfile
    or die "Couldn't read logfile '$logfile': $!";

      [download]

      That way you get a real OS-file handle on which the mechanisms used by IO::Select might work better.

      Other than that, maybe you want to look into the other Event mechanisms to handle multiple filehandles, or even POE, although I'm not sure if POE is a solution.

[reply]
[d/l]
[select]
        Hm. This might explain the lack of action when I us the "tie" example
        I will try this instead, but I am currently getting an error message when I run that code
        I'll try to work it out though..
        erromsg:
        Can't use an undefined value as filehandle reference at ./unixfh line 4. 
        #!/usr/bin/perl -w
use strict;
my $logfile= "./totte.log";
open my $log, "| -", 'tail', '-f', $logfile or die "Couldn't read logf
+ile '$logfile': $!";

        [download]
[reply]
[d/l]
[reply]

In Section Seekers of Perl Wisdom