if ($buf =~ s/(.*\n)//) { # line is in $1 my $line = $1; ...process $line here... }
Note that the s operator conveniently removes the first complete line from $buf as well as returns whether there was a complete line found or not.
btw, have you considered using the Net::IRC module? Have a look at this example: http://jk0.org/projects/perl-irc-bot/
In reply to Re^3: Joining a Thread in w While loop
by pc88mxer
in thread Joining a Thread in w While loop
by deadpickle
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |