PERL VE CGI

#!/usr/bin/perl
use CGI;

$q = new CGI;

$KULLANICI = $ENV{"REMOTE_USER"};

print $q->header;
print $q->start_html('Örnek');
print $q->h1('Bu Akedemik Bilişim İçin Hazırlanmış Bir Örnektir.');
print $q->p();
print "$KULLANICI, seminere hoş geldin...";
print $q->end_html;

exit;

Önceki Sonraki