use Test;
BEGIN { plan(tests => 1) }
my $l = Net::Frame::Layer::ICMPv4::Echo->new;
$l->pack;
$l->unpack;
print $l->print."\n";
my $encap = $l->encapsulate;
$encap ? print "[$encap]\n" : print "[none]\n";
ok(1);