Estoy intentando encontrar una solución rápida y sucia a la impresión dúplex manual con automator. Siempre falla en el paso "Extraer páginas pares e impares" sin importar el PDF que le eche.
El autómata script es el siguiente:
Registro:
** Automator Workflow Log: /Users/lilywhite/Library/PDF Services/Manual Duplex.workflow **
2022-12-19 12:15:50 +0000: Get Specified Finder Items completed
2022-12-19 12:15:50 +0000: Conversion from Files/Folders to PDF files completed
2022-12-19 12:15:50 +0000: Extract Odd & Even Pages failed - 1 error
2022-12-19 12:15:50 +0000: Command line tool returned error 127.: 127
FYI: He hecho un simple Perl script para lograr dúplex manual. Aunque no está relacionado con la pregunta, lo pongo aquí por si ayuda a alguien:
#!/usr/bin/env perl
use v5.36;
use PDF::API2;
foreach my $file (@ARGV) {
say "Processing $file:";
my $source_pdf = PDF::API2->open($file);
my $odd_pdf = PDF::API2->new();
my $even_pdf = PDF::API2->new();
$source_pdf->page() if ($source_pdf->page_count() % 2 == 1);
my $n = $source_pdf->page_count();
for (my $i = 1, my $j = ($n % 2 == 0 ? $n : $n - 1); $i <= $n && $j >= 0; $i += 2, $j -= 2) {
$even_pdf->import_page($source_pdf, $j, $even_pdf->page_count() + 1);
$odd_pdf->import_page($source_pdf, $i, $odd_pdf->page_count() + 1);
}
$even_pdf->save("${file}_even.pdf");
$odd_pdf->save("${file}_odd.pdf");
say "Done.";
say "Start printing odd pages";
system "lp '${file}_odd.pdf'" and die "Printing failed"; # shells return 0 on success
print "Done, continue printing even pages? (y/N) ";
chomp(my $answer = <STDIN>);
die "Abort" unless (lc($answer) eq 'y');
say "Start printing even pages";
system "lp '${file}_even.pdf'" and die "Printing failed";
say "Done!";
}