open my $file, '>', 'hello';
  print{$file} "Hello";