open(FILE,">$filename") or die "Couldn't open file: $!";
foreach (@my_array) {
 print FILE $_;
}
close(FILE);