мета-данные страницы
  •  
Загрузка не удалась. Возможно, проблемы с правами доступа?

Различия

Показаны различия между двумя версиями страницы.

Ссылка на это сравнение

Следующая версия		Предыдущая версия
perl:ex7pascal [28/02/2017 15:39] – создано vlasovperl:ex7pascal [28/02/2017 15:41] (текущий) – vlasov
Строка 1: Строка 1:
-Вот, образец кода+Вот, минимальный образец кода, который необходимо скомпилировать, сделать исполняемым и положить в папку `cgi-bin`.
  
 <code pascal> <code pascal>
 program mini; program mini;
- 
 uses dos; uses dos;
  
Строка 13: Строка 12:
 writeln('Content-Type:text/plain'); writeln('Content-Type:text/plain');
 writeln(); writeln();
- 
- 
 // данные, переданные методом GET // данные, переданные методом GET
   a:='';   a:='';
   a:= GetEnv('QUERY_STRING');   a:= GetEnv('QUERY_STRING');
   writeln('GET: ',a);   writeln('GET: ',a);
- 
 end. end.
 </code> </code>