$eth = Net::Packet::ETH->new(src=>$mac_end1,dst=>'ff:ff:ff:ff:ff:ff',type=>'34525');
$ip6 = Net::Packet::IPv6->new(dst => 'FF02::1:2');
$udp = Net::Packet::UDP->new(src=>546,dst=>547);
$data = Net::Packet::Layer7->new(data => make_sollicit());
$frame = Net::Packet::Frame->new(l2=>$eth,l3=>$ip6,l4=>$udp,l7=>$data);
$frame->send();