open my $temp, '+>', undef or die $!;