$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;
print " merging \"$srcfile\" into \"$video\"\n";
}
}
+print "\n";
# Now actually do the merging
foreach $video (sort keys %videos) {
} else {
# Create the merged video
my $errno = system("$cmd");
- if($errno > 0) { $errno = $errno - 255; }
+ $errno = $errno >> 8;
if($errno) { die "-E- make_mkv encountered some errors with exit code $errno\n"; }
# Fix the permissions
system("chown $owner \"$video\"");