golden hour

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

⬆️ Go Up

Upload

File/Folder	Size	Actions
_128x10.al	525 B	Del OK
_128x2.al	998 B	Del OK
_bcd2bin.al	778 B	Del OK
_bcdcheck.al	912 B	Del OK
_bin2bcdn.al	1.13 KB	Del OK
_deadlen.al	509 B	Del OK
_sa128.al	912 B	Del OK
add128.al	590 B	Del OK
addconst.al	714 B	Del OK
autosplit.ix	547 B	Del OK
bcd2bin.al	450 B	Del OK
bcdn2bin.al	884 B	Del OK
bcdn2txt.al	835 B	Del OK
bin2bcd.al	440 B	Del OK
bin2bcdn.al	765 B	Del OK
comp128.al	939 B	Del OK
hasbits.al	529 B	Del OK
ipanyto6.al	554 B	Del OK
ipv4to6.al	486 B	Del OK
ipv6to4.al	477 B	Del OK
mask4to6.al	543 B	Del OK
maskanyto6.al	614 B	Del OK
notcontiguous.al	820 B	Del OK
shiftleft.al	706 B	Del OK
simple_pack.al	471 B	Del OK
slowadd128.al	524 B	Del OK
sub128.al	607 B	Del OK

Edit: ipv6to4.al

# NOTE: Derived from ../../blib/lib/NetAddr/IP/UtilPP.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package NetAddr::IP::UtilPP; #line 438 "../../blib/lib/NetAddr/IP/UtilPP.pm (autosplit into ../../blib/lib/auto/NetAddr/IP/UtilPP/ipv6to4.al)" sub ipv6to4 { my $naddr = shift; _deadlen(length($naddr)) if length($naddr) != 16; @_ = unpack('L3H8',$naddr); return pack('H8',@{_}[3..10]); } # end of NetAddr::IP::UtilPP::ipv6to4 1;
Save