check if DEV is UP

diff --git a/lib/PXElator/server.pm b/lib/PXElator/server.pm
index 9e64b75..b423674 100644 (file)
--- a/lib/PXElator/server.pm
+++ b/lib/PXElator/server.pm
@@ -21,6 +21,7 @@ tie our $new_clients, 'ties', 'new_clients' => $ip_to - $ip_from;
 if ( my $dev = $ENV{DEV} ) {
        my $ifconfig = `ifconfig $dev`;
        die "can't ifconfig $dev" unless $ifconfig;
+       die "device $dev not up: ifconfig $dev\n$ifconfig" unless $ifconfig =~ m/UP/;
        $ip      = $1 if $ifconfig =~ m/inet addr:(\S+)/s;
        $netmask = $1 if $ifconfig =~ m/Mask:(\S+)/s;
        $bcast   = $1 if $ifconfig =~ m/Bcast:(\S)/s;