Unsupported scripts and control panel web app for a hosting company
Ви не можете вибрати більше 25 тем
Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.
12345678910 |
- #!/opt/perl/current/bin/perl
- print "Content-type: text/html\n\n";
- print "<HTML><HEAD>";
- print "<TITLE>CGI Test</TITLE>";
- print "</head>";
- print "<BODY><h2>Perl Enviroment Info</h2>";
- foreach $key (sort keys(%ENV)) {
- print "$key = $ENV{$key}<p>";
- }
- print "</BODY></HTML>";
|