foreach my $path (@all_paths, ()) {