| line |
l |
!l |
condition |
|
27
|
0 |
0 |
$$self{'nickname'} //= 'ikusan' |
|
28
|
0 |
0 |
$$self{'port'} ||= 6667 |
|
29
|
0 |
0 |
$$self{'post_interval'} //= 2 |
|
30
|
0 |
0 |
$$self{'reconnect_interval'} //= 3 |
|
31
|
0 |
0 |
$$self{'receive_commands'} //= ['PRIVMSG'] |
|
33
|
0 |
0 |
$$self{'http_port'} //= 19300 |
|
34
|
0 |
0 |
$$self{'max_workers'} //= 10 |
|
39
|
0 |
0 |
$$self{'on_option_error'} //= sub {
my($e, $receive) = @_;
warn "on_option_error: $e";
}
|
|
43
|
0 |
0 |
$$self{'on_start'} //= sub {
my($pm, $receive, $sub, $message, @matches) = @_;
warn "on_start: $message";
}
|
|
47
|
0 |
0 |
$$self{'on_error'} //= sub {
my($e, $pm, $receive, $sub, $message, @matches) = @_;
warn "on_error: $e";
}
|
|
51
|
0 |
0 |
$$self{'on_finish'} //= sub {
my($pm, $receive, $sub, $message, @matches) = @_;
warn "on_finish: $message";
}
|
|
190
|
0 |
0 |
(shift())->{'_reactions'} ||= [] |
|
267
|
0 |
0 |
$args{'privmsg'} || 0 |