my @dates = map {localtime($_)} (0,1000,2000); print join("\n", @dates);