#!/usr/bin/perl -w

use Dmitri::Test;

print <<HTML;
Content-type: text/plain

HTML

Dmitri::Test::say_hi;

exit(0);