Select Code to Download

<img src="/cgi-bin/image.pl?img=$tag.jpg">

#!/usr/bin/perl -T
use CGI;
...
}   
print $q->header(-status => '404 Not found');
print "<h1>Not found.</h1>\n";