| line | true | false | branch | 
 
| 46 | 0 | 1 | unless @_ | 
 
| 59 | 0 | 0 | unless $group =~ /^$IP$/o | 
 
| 67 | 0 | 1 | unless $group =~ /^$IP$/o | 
 
| 76 | 0 | 0 | if $sock->can('addr_to_interface') | 
 
| 78 | 0 | 0 | unless @_ | 
 
| 81 | 0 | 0 | $sock->_mcast_if($interface) ? : | 
 
| 86 | 1 | 0 | unless defined(my $interface = shift()) | 
 
| 87 | 0 | 0 | if $interface =~ /^$IP$/ | 
 
| 88 | 0 | 0 | if length $interface == 16 | 
 
| 89 | 0 | 0 | unless $sock->can('if_addr') | 
 
| 91 | 0 | 0 | unless my $addr = $sock->if_addr($interface) | 
 
| 93 | 0 | 0 | unless $interface eq 'any' or $sock->if_flags($interface) & IFF_MULTICAST() | 
 
| 101 | 0 | 0 | if (my $dest = shift()) | 
 
| 102 | 0 | 0 | if $dest =~ /^($IP):(\d+)$/ | 
 
| 103 | 0 | 0 | unless length $dest == 16 | 
 
| 112 | 0 | 0 | if @_ |