using Perl's tempdir function to handle temporary directories

I-TASSER currently creates directories using commands like


$tmpdir="/tmp/$usrname/$unicode";
`mkdir -p $tmpdir`;

but, on our cluster, we allow users to have a job-specific temporary directory that gets cleaned up after the job exits. It would be extremely helpful to us if you used Perl's tempdir function to do this instead, as it respects the TMPDIR environment variable, which we can use to get directories created in the proper locations.

Many thanks for your consideration.