Select Code to Download

    my $ip = ($A << 24) + ($B << 16) + ($C << 8) + $D;
    # Do the same for each route address ($net)

#!/usr/bin/env perl

...
    }
    return 'default';
}

    10.10.10.12 -> 10.10.10.1
128.127.126.125 -> default
...
    192.168.1.1 -> default
     10.10.10.5 -> 10.10.10.1