VinsWorldcom@C:\Users\VinsWorldcom\tmp> perl -lpe "join q{.}, reverse split /\./" zones.txt
1.100.10
2.100.10
3.100.10