Select Code to Download

#!/usr/bin/perl

use Net::RawIP;
...
$n->ethnew("eth0") or die "Net::RawIP->ethnew failed"; # error here
$n->ethset(source => 'my.target.lan', dest =>'my.target.lan');    
$n->ethsend;