Differences
This shows you the differences between two versions of the page.
| Both sides previous revision Previous revision | Next revision Both sides next revision | ||
|
litespeed_wiki:other-ext-apps:apache-mod-perl-equivalent [2019/04/24 18:52] Jackson Zhang [Troubleshooting] |
litespeed_wiki:other-ext-apps:apache-mod-perl-equivalent [2019/04/24 18:54] Jackson Zhang [lscgid: execve() No such file error] |
||
|---|---|---|---|
| Line 136: | Line 136: | ||
| awk 'sub("$", "\r")' test.pl.dos > test.pl | awk 'sub("$", "\r")' test.pl.dos > test.pl | ||
| - | You can verify the file format by ''vi''. After the convertion, perl script is working perfectly. | + | You can verify the file format by ''vi test.pl'' and you don't see trailing ''^M'' in each line any more. |
| + | |||
| + | #!/usr/bin/perl | ||
| + | print "Content-type:text/html\n\n"; | ||
| + | print <<EndOfHTML; | ||
| + | <html><head><title>Perl Environment Variables</title></head> | ||
| + | <body> | ||
| + | <h1>Perl Environment Variables</h1> | ||
| + | EndOfHTML | ||
| + | foreach $key (sort(keys %ENV)) { | ||
| + | print "$key = $ENV{$key}<br>\n"; | ||
| + | } | ||
| + | |||
| + | |||
| + | After the convertion, perl script is working perfectly. | ||