Branch Coverage

blib/lib/POE/Component/Server/IRC/Plugin/OperServ.pm
Criterion Covered Total %
branch 9 26 34.6


line true false branch
36 0 2 unless $ircd->state_user_is_operator($nick)
40 1 1 if (my($chan) = $request =~ /^clear\s+(#.+)\s*$/i)
41 0 1 unless $ircd->state_chan_exists($chan)
45 1 0 if (my($chan) = $request =~ /^join\s+(#.+)\s*$/i)
46 0 1 unless $ircd->state_chan_exists($chan)
50 0 0 if (my($chan) = $request =~ /^part\s+(#.+)\s*$/i)
51 0 0 unless $ircd->state_chan_exists($chan)
55 0 0 if (my($chan, $mode) = $request =~ /^mode\s+(#.+)\s+(.+)\s*$/i)
56 0 0 unless $ircd->state_chan_exists($chan)
60 0 0 if (my($chan, $target) = $request =~ /^op\s+(#.+)\s+(.+)\s*$/i)
61 0 0 unless $ircd->state_chan_exists($chan)
72 3 2 if (not $ircd->state_user_is_operator($nick) or $nick eq 'OperServ')
76 2 0 if $ircd->state_is_chan_op($nick, $channel)