for (@my_data) {print $_, "\n"; }