The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Net::RawIP::icmphdr;
use strict;
use warnings;
our $VERSION = '0.24';
use Class::Struct qw(struct);
our @icmphdr = qw(type code check gateway id sequence unused mtu data);
struct ( 'Net::RawIP::icmphdr' => [map { $_ => '$' } @icmphdr ] );

1;