# 692459.pl
use strict;
use warnings;
{
    local *HANDLE;
    open(HANDLE,">outfile.txt");
    print HANDLE "....";
}
__END__