byoctet: also split '/'

hirose31 · Mar 29, 2010 · 3bb5ffb · 3bb5ffb
1 parent c787240
commit 3bb5ffb
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/update-mobilejp-cidr b/update-mobilejp-cidr
@@ -84,8 +84,8 @@ sub main {
 }
 
 sub byoctet {
-    my $ao = [split /\./, $a];
-    my $bo = [split /\./, $b];
+    my $ao = [split /[.\/]/, $a];
+    my $bo = [split /[.\/]/, $b];
     $ao->[0] <=> $bo->[0] or
     $ao->[1] <=> $bo->[1] or
     $ao->[2] <=> $bo->[2] or