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