@@ -25,13 +25,13 @@ my (@nodes_rand, @nodes_sorted);
push @nodes_rand, [$json->[$_]{ip}, $json->[$_]{name}, $json->[$_]{country}] for (0..$nodes_in_numbers -1);
@nodes_sorted = nsort_by { int $_->[0] } @nodes_rand;
format HEAD =
************************************************
Country RX TX
.
write HEAD;
for (0..$nodes_in_numbers -1) {