open my $output, '>&', *STDOUT or die $!;