tags/v1_29/t/net/perl/io/ssi1.pl

#!perl
sub SSI::one {
    print "Content-type: text/html\n\n";

    print "ok 1\n<br>";
}

SSI->one;