See Avoiding race condition with sysopen and the 15 odd line temp file function presented their which is the distilled guts of File::Temp (1800 lines). It also presents some args for not using File::Temp - provided you know what you are doing. Just using $$ or functions you roll yourself (unless you are an uber hacker) is quite possibly a recipe for disaster.