open my $FH, '>', \$output;