You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

ikiwiki-w3m.cgi 381B

123456789101112131415
  1. #!/usr/bin/perl
  2. # ikiwiki w3m cgi meta-wrapper
  3. if (! exists $ENV{PATH_INFO} || ! length $ENV{PATH_INFO}) {
  4. die "PATH_INFO should be set";
  5. }
  6. my $path=$ENV{PATH_INFO};
  7. $path=~s!/!!g;
  8. $path="$ENV{HOME}/.ikiwiki/wrappers/$path";
  9. if (! -x $path) {
  10. print "Content-type: text/html\n\n";
  11. print "Cannot find ikiwiki wrapper: $path\n";
  12. exit 1;
  13. }
  14. exec $path;
  15. die "$path: exec error: $!";