Select Code to Download

1 #! /usr/bin/perl
2 
...
10 STDOUT->open($logfile, '>') or die "Can't re-direct STDOUT:$!";
11 
12 print "Here's some data...\n";

Can't locate object method "open" via package "IO::Handle" (perhaps yo
+u forgot to load "IO::Handle"?) at ./redirect_stdout line 11.

shell returned 255

1 #! /usr/bin/perl
2
...
9 $FH->open($logfile, '>') or die "Can't open $logfile for writing:$!"
+;
10 
11 $FH->print("Here's some data...\n");