open SOMEFILE, '>', $filename;
  # Then...
  print SOMEFILE "Blah, blah, blah";