代码搜索：如何学习 PL？
找到约 10,000 项符合「如何学习 PL？」的源代码
代码结果 10,000
www.eeworm.com/read/100029/15887923
pl install.pl
#!/usr/bin/perl
# Install mirror executable (not documentation) mostly for Wind*ws users.
#
#
# Copyright (C) 1990 - 1998 Lee McLoughlin
#
# Permission to use, copy, and distribute this software and
www.eeworm.com/read/100018/15888077
pl perlpath.pl
# perlpath.pl
# This script gets run only from setup.sh in order to replace the
# #!/usr/local/bin/perl line at the start of scripts with the real path to perl
$ppath = $ARGV[0];
if ($ARGV[1] eq "-"
www.eeworm.com/read/100018/15888078
pl miniserv.pl
#!/usr/local/bin/perl
# A very simple perl web server used by Webmin
# Require needed libraries, including SSL if available
use Socket;
use POSIX;
use Sys::Hostname;
eval "use Net::SSLeay";
if (!$@)
www.eeworm.com/read/100018/15888081
pl newmods.pl
# newmods.pl
# Updates an acl file to include new modules. Called with the parameters
# +
for($i=1; $i
www.eeworm.com/read/100018/15888498
pl browsermatch.pl
# browsermatch.pl
# Functions used in mod_browser.pl and mod_setenvif.pl
sub edit_BrowserMatch_BrowserMatchNoCase
{
local($d, @w, $i, @regex, @var, @val, @case, $rv);
foreach $d (@{$_[0]}, @{$_[1]})
www.eeworm.com/read/100018/15888501
pl autoindex.pl
# autoindex.pl
# Directives in both mod_dir.pl and mod_autoindex.pl
@AddIcon_dirs = ("AddIcon", "AddIconByType", "AddIconByEncoding");
@AddIcon_descs = ("Filename", "MIME type", "Encoding");
sub edi
www.eeworm.com/read/100018/15888502
pl core.pl
# core.pl
# Defines the core module directives
# core_directives(version)
# Returns ar array of references to associative arrays, each containing
# information about some directive. The keys of each
www.eeworm.com/read/100018/15888549
pl thirdparty.pl
# thirdparty.pl
# Checks for modules available in an old install of webmin that are
# not included in this new install, and offers to copy them across.
# Also re-creates clones of existing modules in
www.eeworm.com/read/100018/15888820
pl edquota.pl
#!/usr/local/bin/perl
# edquota.pl
# Run by edquota to edit some user's quota
$no_acl_check++;
require './quota-lib.pl';
$u = $ENV{'QUOTA_USER'};
$fs = $ENV{'QUOTA_FILESYS'};
$sb = $ENV{'QUOTA_SBLOCK
www.eeworm.com/read/100018/15888847
pl edgrace.pl
#!/usr/local/bin/perl
# edgrace.pl
# Run by edquota to edit the grace times for some filesystem
require './quota-lib.pl';
$fs = $ENV{'QUOTA_FILESYS'};
$bt = $ENV{'QUOTA_BTIME'};
$bu = $ENV{'QUOTA_BUN