print an array to a file

open (DEST, "test.txt" )
print DEST @myarray ;
close (DEST)