代码搜索：cgi

找到约 10,000 项符合「cgi」的源代码

代码结果 10,000
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/100018/15888522

cgi fsck.cgi

#!/usr/local/bin/perl # fsck.cgi # Where the fsck command actually gets run require './fdisk-lib.pl'; &ReadParse(); &can_edit_disk($in{'dev'}) || &error($text{'fsck_ecannot'}); &header($text{'fsck_ti
·
www.eeworm.com/read/100018/15888530

cgi reboot.cgi

#!/usr/local/bin/perl # reboot.cgi # Reboot the system after changing partitions require './fdisk-lib.pl'; &header($text{'reboot_title'}, ""); print "\n"; print "$text{'reboot_msg'}\n";
·
www.eeworm.com/read/100018/15888531

cgi index.cgi

#!/usr/local/bin/perl # index.cgi # Display a list of known disks and partitions require './fdisk-lib.pl'; &error_setup($text{'index_err'}); &header($text{'index_title'}, "", undef, 0, 1); print "
·
www.eeworm.com/read/100018/15888546

cgi index.cgi

#!/usr/local/bin/perl # index.cgi # List all webmin users require './acl-lib.pl'; &header($text{'index_title'}, "", undef, 0, 1); print "\n"; @ulist = &list_users(); foreach $m (&list_modules())
·
www.eeworm.com/read/100018/15888697

cgi logout.cgi

#!/usr/local/bin/perl require './web-lib.pl'; &init_config(); &get_miniserv_config(\%miniserv); open(LOGOUT, ">$miniserv{'logout'}"); close(LOGOUT); &redirect("/");
·
www.eeworm.com/read/100018/15888717

cgi start.cgi

#!/usr/local/bin/perl # start.cgi # Start bind 4 require './dns-lib.pl'; system("$config{'named_pathname'} -b $config{'named_boot_file'} >/dev/null
·
www.eeworm.com/read/100018/15888727

cgi restart.cgi

#!/usr/local/bin/perl # restart.cgi # Restart the running named require './dns-lib.pl'; &ReadParse(); $whatfailed = "Failed to restart named"; kill('HUP', $in{'pid'}) || &error("Failed to signal proc
·
www.eeworm.com/read/100018/15888731

cgi index.cgi

#!/usr/local/bin/perl require './dns-lib.pl'; &header("BIND 4 DNS Server", "", undef, 1, 1); print "\n"; %access = &get_module_acl(); # Check if named exists if (!(-x $config{'named_pathname'})
·
www.eeworm.com/read/100018/15888740

cgi run.cgi

#!/usr/local/bin/perl # run.cgi # Run some command with the given parameters require './custom-lib.pl'; &foreign_require("proc", "proc-lib.pl"); &ReadParse(); $| = 1; &error_setup($text{'run_err'});
·
www.eeworm.com/read/100018/15888751

cgi index.cgi

#!/usr/local/bin/perl # index.cgi # Display commands available for execution require './custom-lib.pl'; &header($text{'index_title'}, "", undef, 0, 1); print "\n"; @cust = grep { &can_run_comman
·