Cosmetic: Cleanup initial comments block.

[harpy.git] / harpy

diff --git a/harpy b/harpy
index cb02bd2..f493fb7 100755 (executable)
--- a/harpy
+++ b/harpy
@@ -7,6 +7,7 @@
 # or
 # ha:2345:respawn:/usr/local/sbin/harpy >>/var/log/harpy.log eth_intra
 
+
 use bytes;
 sub __KERNEL__ { 1; }  # for "linux/socket.ph"
 use strict;
@@ -183,7 +184,13 @@ my($msg)=@_;
 
 
 my %socks;
-for my $ifname (@ARGV) {
+my @ifnames=@ARGV;
+while (@ifnames) {
+       my $ifname=shift @ifnames;
+       if ($ifname=~/{(\d+)-(\d+)}/) {
+               push @ifnames,$`.$_.$' for $1..$2;
+               next;
+               }
        my($sock,$hw)=sock($ifname);
        $socks{$ifname}={
                        "sock"=>$sock,