From f286f4884da7df80015e9c84922b41017fcde6df Mon Sep 17 00:00:00 2001 From: Jules Laplace Date: Mon, 24 Sep 2018 03:13:40 +0200 Subject: order --- splice.pl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/splice.pl b/splice.pl index 4210fed..0269063 100644 --- a/splice.pl +++ b/splice.pl @@ -70,17 +70,19 @@ for my $filename (@sequence_files) { if ($start_frame <= $sequence_i and $sequence_i <= $end_frame) { chomp $filename; print($pwd . $filename. "\n"); - system('ln', '-s', $pwd . $filename, sprintf('./sequences/%s/frame_%05d.png', $dataset, $dataset_i)); + my $a_fn = sprintf('./datasets/%s/train_A/%s_%05d.png', $dataset, $sequence, $sequence_i); + my $b_fn = sprintf('./datasets/%s/train_B/%s_%05d.png', $dataset, $sequence, $sequence_i); + if (! -e $a_fn) { + system('ln', '-s', $pwd . $filename, sprintf('./sequences/%s/frame_%05d.png', $dataset, $dataset_i)); + $dataset_i += 1; + } if (defined $last_fn) { - my $a_fn = sprintf('./datasets/%s/train_A/%s_%05d.png', $dataset, $sequence, $sequence_i); - my $b_fn = sprintf('./datasets/%s/train_B/%s_%05d.png', $dataset, $sequence, $sequence_i); if (! -e $a_fn && ! -e $b_fn) { system('ln', '-s', $pwd . $last_fn, $a_fn); system('ln', '-s', $pwd . $filename, $b_fn); } } $last_fn = $filename; - $dataset_i += 1; } if ($end_frame < $sequence_i) { break; -- cgit v1.2.3-70-g09d2