$filename = $timestamp.".txt"; 
print $filename; 
sleep 5; 
open (TEMPFILE, ">$filename") or die "error, can't create $filename : $!";