Mercurial > laserkard

comparison laserkard_source_images/convert.pl @ 13:b677f4b6185c laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r14]
author rlm
date Fri, 01 Jan 2010 23:21:30 -0500
parents 8c0bb42eef89
children 5c7f16af1dd2
comparison
equal deleted inserted replaced
12:8c0bb42eef89 13:b677f4b6185c
6 6
7 #@rr = @rr[0]; 7 #@rr = @rr[0];
8 for $t(@rr) 8 for $t(@rr)
9 { 9 {
10 10
11 $t =~ m/(.*)\.jpg/; 11 $t =~ m/(.*)\.png/;
12 $name = $1; 12 $name = $1;
13 13
14 14
15 print "convert", " $name.jpg -resize 630x360 ../display/$name.jpg\n"; 15 print "convert", " $name.jpg -resize 630x360 ../display/$name.jpg\n";
16 `convert $name.jpg -resize 630x360 ../display/$name.jpg`; 16 `convert $name.png -resize 630x360 ../images/display/$name.jpg`;
17 print "convert", " $name.jpg -resize 280x160 ../thumbnails/$name.jpg\n"; 17 print "convert", " $name.jpg -resize 280x160 ../thumbnails/$name.jpg\n";
18 `convert $name.jpg -resize 280x160 ../thumbnails/$name.jpg` 18 `convert $name.png -resize 280x160 ../images/thumbnails/$name.jpg`
19 19
20 20
21 21
22 22
23 } 23 }