$tmp = new File::Temp( UNLINK => 0, SUFFIX => '.dat' );

##</code><code>##

$unopened_file = mktemp( $template );