打开到标量的文件句柄

           As a special case the three-argument form with a read/write mode and the third argument being "undef":

 

               open(my $tmp, "+>", undef) or die ...

 

           opens a filehandle to an anonymous temporary file.  Also using "+<" works for symmetry, but you really should consider writing something to the temporary

           file first.  You will need to seek() to do the reading.

 

           Since v5.8.0, Perl has built using PerlIO by default.  Unless you've changed this (such as building Perl with "Configure -Uuseperlio"), you can open

           filehandles directly to Perl scalars via:

 

               open($fh, ">", \$variable) || ..

 

           To (re)open "STDOUT" or "STDERR" as an in-memory file, close it first:

 

               close STDOUT;

               open(STDOUT, ">", \$variable)

                   or die "Can't open STDOUT: $!";