in reply to Problems with Net::Packet (newbie)
Either that, or you could change make_sollicit so that it returns its data wrapped up in a Net::Packet::Layer7 object.$eth = Net::Packet::ETH->new(src=>$mac_end1,dst=>'ff:ff:ff:ff:ff:ff',t +ype=>'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();
@/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/; map{y/X_/\n /;print}map{pop@$_}@/for@/
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Problems with Net::Packet (newbie)
by Anonymous Monk on Sep 14, 2005 at 07:13 UTC |