Select Code to Download

#!/usr/bin/perl
use strict;
...
my $blah = `perl ./tmp.cgi id=$id auth_id=$auth_id draw=1 raw=raw`;
print $blah, "\n";
exit;

#!/usr/bin/perl
use strict;
...
print $draw, "\n";
print $raw, "\n";
exit;