How do I make a temporary file name?
もしファイル名を知る必要がないなら、open() でファイル名の部分に undef を指定します。 Perl 5.8 以降では、open() 関数は無名一時ファイルを作成します。

perlfaq5