my $limit = 99999;
    my $md;


    # Creates unique tmpfile
    do {
        $tmpname = int(rand($limit));
        $md      = "$TMPDIR/runitout_$tmpname";
    } until (! -f "$md");