It works fine, but only with perl 5.8. You should really check for errors. And I prefere my vars for the filehandle. It is good practice and you can yse them to.

  open (my $page, ">:utf8", $news) or die $!;
  print $page @xxxx;
  close $page;
[download]