Help for this page

Select Code to Download

Select or download this

C:\>perl -de 1

...
5.008006

  DB<6> q

Select or download this

socket($self->{"fh"}, PF_INET, SOCK_RAW, $self->{"proto_num"}) ||
  croak("icmp socket error - $!");