Select Code to Download

#!/usr/bin/perl

...
close $ps;

system "gs -q -dBATCH -dNOPAUSE -sDEVICE=pngalpha -r140 -g1000x500 -sO
+utputFile=$outfile $tmpfile";