Add CGI args parser

This commit is contained in:
Jamie Cameron
2009-06-09 00:53:24 +00:00
parent b63fe2d359
commit ce39d419a7

View File

@@ -6,7 +6,7 @@ sub cgi_args
my ($cgi) = @_;
if ($cgi eq 'search.cgi') {
# Example search
return 'search=net';
return 'search=ssh';
}
elsif ($cgi eq 'edit_pack.cgi' || $cgi eq 'list_pack.cgi') {
# Package for /bin/ls