Konvertieren mit Hilfe von Ghostscript (gelöst) (Allgemeines zu Perl)

[thread]16999[/thread]

Konvertieren mit Hilfe von Ghostscript [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+6 replies
heralkey

2011-12-19 17:45
User since
2011-11-20
8 Artikel
BenutzerIn
Hallo Liste,

ich hab nochmal ein Problem mit nachfolgendem Script.

Wenn ich es laufen lasse, kommt folgende meldung:

"Useless use of string in void context at ./seiten-jpgs_verschieben.pl line 15."

Was ist in der Zeile falsch bzw. was passt dort nicht.

Hier der Code:
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

#!/usr/bin/perl -w my $pdfdir= "/mnt/sun/export/seiten-jpgs"; my $outdir= "/home/kamp"; use File::Path; use File::Copy; chdir ("$pdfdir"); foreach $file (glob("*.pdf")) { ($name = $file) =~ s/^(.*)\.pdf/$1/; "/usr/bin/gs -q -dNOPAUSE -r144 -dBATCH -sDEVICE=jpeg -sOutputFile=$outdir/$name.jpg $pdfdir/$name.pdf"; }
modedit Editiert von pq: code-tags hinzugefügt
Last edited: 2011-12-19 17:47:30 +0100 (CET)
- +5 replies
- pq
  
  2011-12-19 17:52
  User since
  2003-08-04
  12208 Artikel
  Admin1
  in zeile 15 steht ein string, mit dem du nichts tust.
  möchtest du einen systembefehl absetzen? das geht z.b mit qx{} oder system:
  
  Code (perl): (dl )
  
  1 2 3
  
  my $output = qx{/usr/bin/gs ..}; my $exitcode = system("/usr/bin/gs ..");
  
  perlop
  perlfunc
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - heralkey
    
    2011-12-20 08:10
    
    User since
    2011-11-20
    8 Artikel
    BenutzerIn
    
    Hi pg,
    
    danke für den Tipp; werde ich mal probieren bzw. mir ansehen.
  - heralkey
    
    2011-12-20 08:35
    
    User since
    2011-11-20
    8 Artikel
    BenutzerIn
    
    Achso, jetzt sehe ich den String; gestern habe ich vor lauter bäumen den Wald nicht mehr gesehen...
    
    Ja, ich will aus dem Perlscript einen Systembefehl nutzen. Nämlich Ghostscript soll mir ein paar PDFs in Jpges wandeln.
  - +2 replies
  - heralkey
    
    2011-12-20 08:53
    
    User since
    2011-11-20
    8 Artikel
    BenutzerIn
    
    so, die variante mit "system ..." hat jetzt funktioniert- danke für den tipp
    - pq
      
      2011-12-20 09:38
      
      User since
      2003-08-04
      12208 Artikel
      Admin1
      
      dann klick doch das nächste mal auf den grünen haken under dem thread-titel, wo steht "Thread als gelöst markieren". danke.
      und benutze bitte das nächste mal code-tags.
      Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
      lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem

View all threads created 2011-12-19 17:45.