1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/laserkard_source_images/convert.pl	Fri Jan 01 23:13:52 2010 -0500
     1.3 @@ -0,0 +1,23 @@
     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/(.*)\.jpg/;
    1.15 +$name = $1;	
    1.16 +
    1.17 +
    1.18 +print "convert", " $name.jpg -resize 630x360 ../display/$name.jpg\n";
    1.19 +`convert $name.jpg -resize 630x360 ../display/$name.jpg`;
    1.20 +print "convert", " $name.jpg -resize 280x160 ../thumbnails/$name.jpg\n";
    1.21 +`convert $name.jpg -resize 280x160 ../thumbnails/$name.jpg`
    1.22 +
    1.23 +
    1.24 +
    1.25 +
    1.26 +}
    1.27 \ No newline at end of file