#!/usr/local/bin/perl -w
use strict;

print qq(content-type: text/html\n\n

print qq(<HTML><HEAD><TITLE>Strona domowa Testu CGI</TITLE></HEAD>
<BODY>Witam: jestem testow stron domow.
<A HREF="/AA_next">Kliknij, jeli chcesz zobaczy moj drug twarz</A>
</BODY></HTML>);
