golden hour

/lib64/perl5/vendor_perl/auto/NetAddr/IP

⬆️ Go Up

Upload

File/Folder	Size	Actions
InetBase	-	Del OK
Util	-	Del OK
UtilPP	-	Del OK
_compV6.al	1 KB	Del OK
_compact_v6.al	1.01 KB	Del OK
_splitplan.al	2.91 KB	Del OK
_splitref.al	936 B	Del OK
autosplit.ix	373 B	Del OK
coalesce.al	1.35 KB	Del OK
compactref.al	1.67 KB	Del OK
do_prefix.al	891 B	Del OK
hostenum.al	329 B	Del OK
mod_version.al	427 B	Del OK
nprefix.al	603 B	Del OK
prefix.al	605 B	Del OK
re.al	1.4 KB	Del OK
re6.al	1.83 KB	Del OK
short.al	500 B	Del OK
wildcard.al	485 B	Del OK

Edit: wildcard.al

# NOTE: Derived from blib/lib/NetAddr/IP.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package NetAddr::IP; #line 748 "blib/lib/NetAddr/IP.pm (autosplit into blib/lib/auto/NetAddr/IP/wildcard.al)" sub wildcard($) { my $copy = $_[0]->copy; $copy->{addr} = ~ $copy->{mask}; $copy->{addr} &= V4net unless $copy->{isv6}; if (wantarray) { return ($_[0]->addr, $copy->addr); } return $copy->addr; } # end of NetAddr::IP::wildcard 1;
Save