#Does not work open(my $fh, '>>', 'test.out'); openTee(*STDOUT, *STDOUT, *$fh); #### #Should be working open(my $fh, '>>', 'test.out'); openTee(*STDOUT, *STDOUT, $fh); #asterisks ONLY before STDOUT, NOT $fh