Package: libnet-cidr-perl Version: 0.11-1 Severity: wishlist Net::CIDR does not support an abbreviated cidr notation like "0/0" or "192.168/16". Therefore the script:
----------------------------------------
#!/usr/bin/perl -w
use Net::CIDR;
my $ip = '192.168.1.42';
my @net = qw(192.168/16);
print "lookup: ", $ip, "\n";
print "in: ", join (':', @net), "\n";
print Net::CIDR::cidrlookup($ip, @net) ? '' : 'no ', "match.\n";
----------------------------------------
dies (actually croaks) with
| at /tmp/cidr.pl line 11
Can you please
- make the error message more verbose, as far as I can see this one is
from /usr/share/perl5/Net/CIDR.pm line 581.
- add support for such an abbreviated notation.
- or at least: add an according warning in the BUGS section of the
manual page so other users can save the time I spent in finding the
reason why my script died.
Thanks
Christoph
-- System Information:
Debian Release: testing/unstable
APT prefers testing
APT policy: (500, 'testing')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.18
Locale: LANG=de_DE.UTF-8, LC_CTYPE=de_DE.UTF-8 (charmap=UTF-8)
Versions of packages libnet-cidr-perl depends on:
ii perl 5.8.8-6.1 Larry Wall's Practical Extraction
libnet-cidr-perl recommends no packages.
-- no debconf information
signature.asc
Description: Digital signature
