8 |
use strict; |
use strict; |
9 |
our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION); |
our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION); |
10 |
use Exporter; |
use Exporter; |
11 |
$VERSION = 0.66; |
$VERSION = 0.67; |
12 |
@ISA = qw(Exporter); |
@ISA = qw(Exporter); |
13 |
|
|
14 |
@EXPORT = qw(MAGIC_COOKIE); |
@EXPORT = qw(MAGIC_COOKIE); |
50 |
use constant DHCP_UDP_OVERHEAD => (14 + 20 + 8); # Ethernet + IP + UDP |
use constant DHCP_UDP_OVERHEAD => (14 + 20 + 8); # Ethernet + IP + UDP |
51 |
use constant DHCP_MAX_MTU => 1500; |
use constant DHCP_MAX_MTU => 1500; |
52 |
use constant BOOTP_ABSOLUTE_MIN_LEN => 236; |
use constant BOOTP_ABSOLUTE_MIN_LEN => 236; |
53 |
use constant BOOTP_MIN_LEN => 300; |
use constant BOOTP_MIN_LEN => 271; # dpavlin - Linux bootp is smaller than 300 |
54 |
use constant DHCP_MIN_LEN => 548; |
use constant DHCP_MIN_LEN => 548; |
55 |
|
|
56 |
BEGIN { |
BEGIN { |