linux-l: Viele jpg -> ps

[Steffen Dettmer]

* Jens Dreger wrote on Wed, Mar 21, 2001 at 10:32 +0100:
> On Wed, Mar 21, 2001 at 09:28:08AM +0100, Michael Müller wrote:
> 	  
>      find . -print0 | xargs -0 ...
> 
> selbstaendig anlegen), waere das eine prima Loesung. Alles, was eine
> shell oeffnet, fuehrt aber leider dazu, dass alle Sonderzeichen wieder
> interpretiert werden, was fatale Folgen haben kann. 

Also doch wieder perl?

find . -print0 | perl -n0e '
if (/^(.*)\.jpg$/) {
	die "I'm just an untested perl demo!\n";
	$base=$1; 
	system('jpeg2ps', $base . '.jpg', '-o', $base . '.ps');
        $exit_value  = $? >> 8;  # check
        $signal_num  = $? & 127; # check
}'

Besonders gefällt mir die erste Zeile nach dem "if" :)

oki,

Steffen

-- 
Dieses Schreiben wurde maschinell erstellt,
es trägt daher weder Unterschrift noch Siegel.