Perlのopen()はファイル名に相当する引数がリファレンスだと特別扱いする。以下のようなことが出来るのはそのためだ。 my $scalar = 'foo'; open my $fh, '<', \$scalar; print <$fh>; # => "foo" これはスカラーリファレンスに対してPerlIO::scalarを自動的…