%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /home/rs/perl/default/lib/perl5/site_perl/5.32/mach/auto/NetAddr/IP/
Upload File :
Create Path :
Current File : /home/rs/perl/default/lib/perl5/site_perl/5.32/mach/auto/NetAddr/IP/canon.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 879 "blib/lib/NetAddr/IP.pm (autosplit into blib/lib/auto/NetAddr/IP/canon.al)"
sub canon($) {
  my $addr = $_[0]->addr;
  return $_[0]->{isv6} ? lc _compV6($addr) : $addr;
}

# end of NetAddr::IP::canon
1;

Zerion Mini Shell 1.0