# creating the packet chunks
my $packet_eth = $ethernet->encode();
my $packet_ip  = $ip->encode();
my $packet = $packet_eth 
   . (0 x (60 - length($packet_eth) - length($packet_ip)))
   . $packet_ip;