"subs" is not defined in %Net::Frame::Layer::EXPORT_TAGS at /usr/local/share/perl/5.10.0/Net/Frame/Layer.pm line 8 
Can't continue after import errors at /usr/local/share/perl/5.10.0/Net/Frame/Layer/IPv4.pm line 8 
BEGIN failed--compilation aborted at /usr/local/share/perl/5.10.0/Net/Frame/Layer/IPv4.pm line 8.

   use Net::Frame::Layer::IPv4; 
   use Net::Frame::Layer::TCP; 
   use Net::Frame::Simple; 
 
 my $ip = Net::Frame::Layer::IPv4->new(src=> '192.168.95.2',dst=> '192.168.95.1',); 
 
 my $tcp = Net::Frame::Layer::TCP->new( dst => '21',data=>'test',); 
  my $simple = Net::Frame::Simple->new( layers=>[$ip,$tcp],); 
 
   use Net::Write::Layer3; 
   use Net::Frame::Dump::Online; 
 
 
  my $oWrite = Net::Write::Layer3->new(dst => '192.168.95.1'); 
 
 
 
 
  $oWrite->open; 
  $simple->send($oWrite); 
  $oWrite->close;