$self->tempfile( File::Temp->new(UNLINK => 1, SUFFIX => '.tmp') );
print {$self->tempfile} "I am here";