формат команды perl($text) в случае вывода в файл

Как ни странно print(FILEHANDLE LIST);

Вариант 2:

my $oldfh=select(FILEHANDLE);
print(LIST);
select($oldfh);

Вариант три: написать свою принт-функцию. Тогда придется пересилить себя всего один раз.