1.1 --- a/laserkard_source_images/convert.pl	Fri Jan 01 23:21:43 2010 -0500
     1.2 +++ b/laserkard_source_images/convert.pl	Fri Jan 01 23:31:58 2010 -0500
     1.3 @@ -1,23 +1,24 @@
     1.4 -@rr = glob('*.jpg');
     1.5 -
     1.6 -$" = "\n";
     1.7 -
     1.8 -print "@rr\n";
     1.9 -
    1.10 -#@rr = @rr[0];
    1.11 -for $t(@rr)
    1.12 -{
    1.13 -
    1.14 -$t =~ m/(.*)\.png/;
    1.15 -$name = $1;	
    1.16 -
    1.17 -
    1.18 -print "convert", " $name.jpg -resize 630x360 ../display/$name.jpg\n";
    1.19 -`convert $name.png -resize 630x360 ../images/display/$name.jpg`;
    1.20 -print "convert", " $name.jpg -resize 280x160 ../thumbnails/$name.jpg\n";
    1.21 -`convert $name.png -resize 280x160 ../images/thumbnails/$name.jpg`
    1.22 -
    1.23 -
    1.24 -
    1.25 -
    1.26 -}
    1.27 +#!/usr/bin/perl
    1.28 +@rr = glob('*.png');
    1.29 +
    1.30 +$" = "\n";
    1.31 +
    1.32 +print "@rr\n";
    1.33 +
    1.34 +#@rr = @rr[0];
    1.35 +for $t(@rr)
    1.36 +{
    1.37 +
    1.38 +$t =~ m/(.*)\.png/;
    1.39 +$name = $1;	
    1.40 +
    1.41 +
    1.42 +print "convert", " $name.png -resize 582x360\! ../images/display/$name.jpg\n";
    1.43 +`convert $name.png -resize 582x360\! ../images/display/$name.jpg`;
    1.44 +print "convert", " $name.png -resize 210x130\! ../images/templates/$name.jpg\n";
    1.45 +`convert $name.png -resize 210x130\! ../images/templates/$name.jpg`
    1.46 +
    1.47 +
    1.48 +
    1.49 +
    1.50 +}