use strict;
use warnings;

use MyTemp;

MyTemp::delete_on_close('this-dir-tmp');
MyTemp::delete_on_close('that-dir-1-tmp', 'that-dir-2-tmp');

# do stuff...

# Directories this-dir-tmp, that-dir-1-tmp, that-dir-2-tmp are
# automatically deleted on program exit.