Help for this page

Select Code to Download


  1. or download this
    open my $fhout, '>', "./test_out.file" or die "$!";
    
  2. or download this
    open (my $fhout, '>', "./test_out.file") || die "$!";
    
  3. or download this
    open (my $fhout, '>', ("./test_out.file" || die "$!"));
    
  4. or download this
    my ($fhout) = @_;
    
  5. or download this
    my $fhout = shift;