Uso de Automator para mover archivos de subtítulos

Considere el uso de AppleScript en lugar de, o en combinación con, Automator. Automator no se adapta fácilmente a los flujos de trabajo que requieren ramas condicionales.

Las ramas condicionales son pasos dentro del flujo de trabajo que realizan una acción dependiendo de algún estado o situación. En este caso, si el archivo de vídeo está presente en la carpeta de destino.

AppleScript puede encargarse de este tipo de tareas, al igual que un perl script u otro lenguaje de scripting.

Ver ¿Puede Automator ramificarse en función del valor de una variable o del resultado de un paso? para un enfoque basado en script combinado con Automator.

Enfoque guionizado

Para tareas como ésta prefiero los lenguajes de scripting como el perl. A continuación hay un script</strkeep><strkeep> que debería servirte para empezar - o que otros pueden utilizar. No ha sido probado, así que trátalo con cuidado:

#!/usr/bin/env perl

use strict;
use warnings;

use File::Basename; # for fileparse

# WARNING: lack of error checking

# Use: ./move_srt.pl <path to source folder> <path to destination folder>

my $source_path = shift;
my $destination_path = shift;

# Get the video file names - without their 3 or 4 letter suffixes
my @destination_video_files = glob($source_path.'/*');
my %named_video_files = map { $_ => fileparse($_,qr/\..{3,4}/); } @destination_video_files;

# Get a list of srt files
my @source_srt_files = glob($source_path.'/*\.srt');

foreach my $source_srt_file (@source_srt_files) {
    print "[Encountered] $source_srt_file\n";

    # Strip suffix and check if video exists with same name
    my $named_srt_file = fileparse($source_srt_file,qr/\.srt/);
    if (exists($named_video_files{$named_srt_file})) {

        # Move the matching srt File
        system('/bin/mv '.$source_srt_file.' '.$destination_path);

        print "[Matched] $source_srt_file\n";
    } else {
        print "[Unmatched] $source_srt_file\n";
    }
}

También puedes usar un shell script como este:

shopt -s globstar extglob nullglob
for f; do
  [[ $f != *.@(srt|ass|ssa) ]] && continue
  base=${f##*/}
  target=$(printf %s\\n ~/Movies/**/"${base%???}"* | head -n1)
  [[ $target ]] && mv "$f" "${target%.*}.${base: -3}"
done
exit 0

Necesitas Bash 4 para globstar que hace que ** coinciden con varios niveles de directorios. Puedes instalar Bash 4 y convertirlo en tu shell de inicio de sesión por defecto ejecutando brew install bash;echo /usr/local/bin/bash|sudo tee -a /etc/shells;chsh -s /usr/local/bin/bash .

nullglob hace que los patrones sin coincidencias se expandan a una cadena vacía. for f; do equivale a for f in "$@"; do . Cuando extglob está activado, @(srt|ass|ssa) coincide exactamente con uno de srt , ass y ssa . Bash no realiza la división de palabras ni la expansión de nombres de archivos dentro de [[ Así que $f no tiene que ser citado. printf %s\\n imprime cada argumento en una línea separada. ${f##*/} elimina el más largo */ patrón desde el principio, ${base%???} elimina los tres últimos caracteres, ${target%.*} elimina el más corto .* patrón desde el final, y ${base: -3} se expande hasta los tres últimos caracteres. [[ $target ]] equivale a [[ -n $target ]] o comprueba si $target está configurado y no está vacío. exit 0 hace que Automator no muestre un diálogo de error si la última prueba sale con 1.