... my @unix_times; for my $wintime ( @times ) { push @unix_times, calc_unix_time($wintime); } print join "\n", @unix_times, '';