代码搜索：cgi
找到约 10,000 项符合「cgi」的源代码
代码结果 10,000
www.eeworm.com/read/100018/15889110
cgi start.cgi
#!/usr/local/bin/perl
# start.cgi
# Start squid
require './squid-lib.pl';
use POSIX;
&ReadParse();
$whatfailed = "Failed to start squid";
$temp = &tempname();
system("$config{'squid_path'} -sY -f $co
www.eeworm.com/read/100018/15889119
cgi acl.cgi
#!/usr/local/bin/perl
# acl.cgi
# Display a form for editing or creating a new ACL
require './squid-lib.pl';
&ReadParse();
$conf = &get_config();
if ($in{'type'}) {
&header("Create ACL", "", undef,
www.eeworm.com/read/100018/15889128
cgi restart.cgi
#!/usr/local/bin/perl
# restart.cgi
# Restart the running squid process
require './squid-lib.pl';
&ReadParse();
$whatfailed = "Failed to reconfigure squid";
$out = `$config{'squid_path'} -f $config{'
www.eeworm.com/read/100018/15889130
cgi cachemgr.cgi
#!/usr/local/bin/perl
# cachemgr.cgi
# Run the squid cachemgr.cgi program
require './squid-lib.pl';
$mgr = $config{'cachemgr_path'};
if (&has_command($mgr)) {
$| = 1;
system($mgr, @ARGV);
}
else {
www.eeworm.com/read/100018/15889133
cgi index.cgi
#!/usr/local/bin/perl
# index.cgi
# Display a menu of different kinds of options
require './squid-lib.pl';
# Check for squid config file
if (!-r $config{'squid_conf'}) {
&header("Squid Proxy Server
www.eeworm.com/read/100018/15889135
cgi clear.cgi
#!/usr/local/bin/perl
# clear.cgi
# Delete the cache, chown the directory to the correct user and re-run squid -z
require './squid-lib.pl';
&ReadParse();
$| = 1;
$config{'cache_dir'} =~ /^\/\S+/ || &
www.eeworm.com/read/100018/15889212
cgi index.cgi
#!/usr/local/bin/perl
require './user-lib.pl';
&header($text{'index_title'}, "", "intro", 1, 1);
$formno = 0;
%access = &get_module_acl();
# List all local users
@ulist = @allulist = &list_users();
www.eeworm.com/read/100018/15889229
cgi index.cgi
#!/usr/local/bin/perl
# index.cgi
# Display a list of exports
require './bsdexports-lib.pl';
&header("NFS Exports", "", undef, 1, 1);
print "\n";
@exp = &list_exports();
if (@exp) {
print "
www.eeworm.com/read/100018/15889269
cgi index.cgi
#!/usr/local/bin/perl
# index.cgi
# Display all mailing lists and majordomo options
require './majordomo-lib.pl';
&header("Majordomo List Manager", "", undef, 1, 1);
print "\n";
%access = &get_mo
www.eeworm.com/read/100018/15889280
cgi ports.cgi
print "\n";
print "Port Numbers\n";
$len = @serv = sort { $a cmp $b } &list_services();
$len = int(($len+3)/4)*4;
print "\n";
for($i=0; $i