mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-08 11:15:41 -04:00
Interpret U+2424 as a \n inside IRC
This commit is contained in:
parent
c3d4511f53
commit
7941b3921a
1 changed files with 2 additions and 0 deletions
|
@ -60,6 +60,8 @@ sub command {
|
|||
$code = "use warnings; ".$code;
|
||||
}
|
||||
|
||||
$code =~ s//\n/g;
|
||||
|
||||
my $filter = POE::Filter::Reference->new();
|
||||
my $socket = IO::Socket::INET->new( PeerAddr => 'localhost', PeerPort => '14400' )
|
||||
or die "error: cannot connect to eval server";
|
||||
|
|
Loading…
Add table
Reference in a new issue