$ time perl write_60mil.pl
AMS  ---- DONE.
EMEA ---- DONE.
APJ  ---- DONE.
Node List is Done.

real   4m35.239s
user  12m 3.641s
sys    0m 4.242s