I don't see anything obvious, but this may be tripping you up:

move $orig,$dest || 
   die "Could not move $orig to $dest: $!"
[download]

You should either be using 'or' instead of || here or wrap your arguments to move in parens. || is of a high precedence, so your statement is interpreted like:

move($orig, $dest || die "...");
[download]

Which means if the move failed, you get no explanation why and your script continues blindly forward. You could be in some kind of loop and just don't know it.

In addition, you indicated that you had debugging code in there before, but the best you can do to explain the problem is "it doesn't die". Can you determine where in your script it's hanging? Is it in an infinite loop somewhere? See if you can isolate the problem spot.