man/cgi_args.pl

   1
   2 do 'man-lib.pl';
   3
   4 sub cgi_args
   5 {
   6 my ($cgi) = @_;
   7 if ($cgi eq 'search.cgi') {
   8         return 'for=ssh&type=1&section=man';
   9         }
  10 elsif ($cgi eq 'view_man.cgi') {
  11         return 'page=ssh&sec=1';
  12         }
  13 return undef;
  14 }