if($errno) { print "-E- Error creating dstdir: $dstdir\n"; next; }
# Perform the move operation from $srcdir/$srcfile -> $dstfile
print "-> Moving \"$srcdir/$srcfile\" to \"$dstfile\"\n";
if($errno) { print "-E- Error creating dstdir: $dstdir\n"; next; }
# Perform the move operation from $srcdir/$srcfile -> $dstfile
print "-> Moving \"$srcdir/$srcfile\" to \"$dstfile\"\n";