bugs

jettero · Jun 7, 2011 · 1ee9b27 · 1ee9b27
1 parent 66fcb65
commit 1ee9b27
Showing 1 changed file with 15 additions and 1 deletion.
diff --git a/t/45_stats.t b/t/45_stats.t
@@ -15,16 +15,30 @@ if( -s "device" ) {
 
 unless( $dev ) {
     warn "   [skipping tests: no device given]\n";
+    UGH_DIE:
     skip(1, 0,0) for 1 .. $max;
     exit 0;
 }
 
-my $npe = Net::Pcap::Easy->new(
+my $npe;
+unless(
+eval {
+$npe = Net::Pcap::Easy->new(
     dev              => $dev,
     promiscuous      => 1,
     packets_per_loop => 1,
     default_callback => sub {},
 );
+}) {
+        if( $@ =~ m/(?:permission|permitted)/i ) {
+            warn "   [skipping tests: permission denied, try running as root]\n";
+
+        } else {
+            warn "couldn't open $dev: $@";
+        }
+
+        goto UGH_DIE;
+    }
 
 $npe->loop;