diff options
| -rwxr-xr-x | dir-to-movie.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/dir-to-movie.pl b/dir-to-movie.pl index aff33d6..3222b1f 100755 --- a/dir-to-movie.pl +++ b/dir-to-movie.pl @@ -49,7 +49,7 @@ chdir("$path/$tag"); my $i = 0; -my @lines = read_dir('.') +my $lines = read_dir('.') my $pwd = `pwd`; chomp $pwd; $pwd .= '/'; @@ -57,7 +57,7 @@ print $pwd . "\n"; mkdir('./tmp'); -for my $line (sort @lines) { +for my $line (sort @$lines) { if ($line !~ /$prefix/) { next; } @@ -82,8 +82,8 @@ if ($tag =~ /\//) { my $ffmpeg = `ffmpeg -hide_banner -i ./tmp/frame_%05d.png -y -c:v libx264 -preset slow -crf 19 -vf fps=25 -pix_fmt yuv420p -s 1024x512 $parent_dir/renders/$tag.mp4`; -my @lines = split("\n", $ffmpeg); -for my $line (@lines) { +my @ffmpeg_lines = split("\n", $ffmpeg); +for my $line (@ffmpeg_lines) { print $line . "\n"; } |