# | Line 265 | Line 265 | EOF | |
---|---|---|
265 | # Make the packet smaller by stripping out newlines and leading spaces. | |
266 | $xml =~ s/\n\s*//g; | |
267 | ||
268 | – | print $xml; |
269 | – | |
268 | my($sock) = new IO::Socket::INET ( | |
269 | PeerPort => $udp_port, | |
270 | PeerAddr => $filter_addr, |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |