请问perl输出 到文件的方法？

请问perl输出 到文件的方法？
我用select，但是报错print() on unopened filehandle AAA at testdb.pl line 38

请问具体select要如何声明文件句柄

我来这问的问题，都是我自.
我来这问的问题，都是我自己做了半天测试之后一点进展都没有的，希望大家帮忙

什么意思啊？--是将结果.
什么意思啊？
是将结果输入保存到指定文件里？

open (TEST ,">c:\\test.txt") or die "$!";
@a=qw(aa bb cc dd ee ff gg);
foreach(@a){
print TEST "$_\n";
}
close TEST;

这样试试
my $TEST;
open (TEST ,">c:\\test.txt") or die "$!";
@a=qw(aa bb cc dd ee ff gg);
print TEST @a,"\n";
close (TEST);