#!/usr/bin/perl -w
print "Content-type: text/html\r\n\r\n";
use Bio::Graphics;
print "Hello there!<br />\nJust testing .<br />\n";
for ($i=0; $i<10; $i++)
{
print $i."<br />";
}