";
";
Таблица 1. Примеры CGI-скриптов на языке Perl
Открытие файлов на сервере: www.пример.ru/cgi-bin/file.pl?stest.doc 
file.pl:
#!/usr/bin/perl
$file=$ARGV[0];
print "Content-type: text/html

";
print "

";
open (expl,"<$file")||
print "File not found
";
while() {
print;
print "
";
}
close (expl);
print "
Выполнение команд на сервере: www.пример.ru/cgi-bin/command.pl?ls 
command.pl:
#!/usr/bin/perl
$file=$ARGV[0];
print "Content-type: text/html

";
print "

";
open (expl,"$file|")||
print "File not found
";
while() {
print;
print "
";
}
close (expl);
print "