if(defined $opt_t) { $merge_opts .= "-t "; }
if(defined $opt_r) { $merge_opts .= "-r "; }
$errno=system("$merge_videos_by_day -s \"$srcpathname\" $merge_opts");
-if($errno > 0) { $errno = $errno - 255; }
+$errno = $errno >> 8;
if($errno) { die "-E- $merge_videos_by_day encountered some errors with exit code $errno\n"; }
# Copy the videos over to the destination path
$newfile = $dstfile . "." . $video_suffix;
if(-e "$newfile.$ext") {
foreach $i ($video_suffix+1 .. '999') {
- $newfile = $dstfile . "." . $i;
+ $newfile = $dstfile . "." . sprintf("%03d",$i);;
if(! -e "$newfile.$ext") { last; }
}
$dstfile = $newfile;