fix constants

This commit is contained in:
bodea 2005-11-25 04:23:55 +00:00
parent 41d3f66458
commit dbcad5e956

View file

@ -15,8 +15,8 @@ use constant ICMP_CODE => 0; # No ICMP code for ECHO and ECHOREPLY
use constant SOL_IP => 0; use constant SOL_IP => 0;
use constant IP_MTU_DISCOVER => 10; use constant IP_MTU_DISCOVER => 10;
use constant IP_PMTUDISC_WANT => 0; use constant IP_PMTUDISC_DONT => 0;
use constant IP_PMTUDISC_DONT => 1; use constant IP_PMTUDISC_WANT => 1;
use constant IP_PMTUDISC_DO => 2; use constant IP_PMTUDISC_DO => 2;
my $verbose = shift if @ARGV and $ARGV[0] =~ /^--?v(erbose)?$/; my $verbose = shift if @ARGV and $ARGV[0] =~ /^--?v(erbose)?$/;