Result:
found more than 687 distributions - search limited to the first 2001 files matching your query
( run in 2.365 )
Apache-HeavyCGI
view release on metacpan or search on metacpan
lib/Apache/HeavyCGI.pm view on Meta::CPAN
}
sub expires {
my Apache::HeavyCGI $self = shift;
my($set) = @_;
$set = Apache::HeavyCGI::Date->new(unix => $set)
if defined($set) and not ref($set); # allow setting to a number
$self->{EXPIRES} = $set if defined $set;
return $self->{EXPIRES}; # even if not defined $self->{EXPIRES};
}
lib/Apache/HeavyCGI.pm view on Meta::CPAN
}
sub last_modified {
my Apache::HeavyCGI $self = shift;
my($set) = @_;
$set = Apache::HeavyCGI::Date->new(unix => $set)
if defined($set) and not ref($set); # allow setting to a number
$self->{LAST_MODIFIED} = $set if defined $set;
return $self->{LAST_MODIFIED} if defined $self->{LAST_MODIFIED};
$self->{LAST_MODIFIED} =
Apache::HeavyCGI::Date->new(unix => $self->time);
}
sub myurl {
my Apache::HeavyCGI $self = shift;
return $self->{MYURL} if defined $self->{MYURL};
Apache-Htpasswd
view release on metacpan or search on metacpan
Htpasswd.pm view on Meta::CPAN
__END__
=head1 NAME
Apache::Htpasswd - Manage Unix crypt-style password file.
=head1 SYNOPSIS
use Apache::Htpasswd;
Htpasswd.pm view on Meta::CPAN
UseMD5 => 1,
});
This is the prefered way to instantiate an object. The 'ReadOnly' param
is optional, and will open the file in read-only mode if used. The 'UseMD5'
is also optional: it will force MD5 password under Unix.
If you want to support plain un-encrypted passwords, then you need to set
the UsePlain option (this is NOT recommended, but might be necesary in some
situations)
Htpasswd.pm view on Meta::CPAN
for allowing change of password without first checking old password. IF
YOU DON'T READ THE DOCS AND SEE I DID THIS DON'T EMAIL ME!
Revision 1.6.0 Handle Blowfish hashes when that's the mechanism crypt() uses.
Revision 1.5.9 MD5 for *nix with new UseMD5 arg for new()
Revision 1.5.8 Bugfix to htpasswd().
Revision 1.5.7 MD5 for Windows, and other minor changes.
Apache-JAF
view release on metacpan or search on metacpan
lib/Apache/JAF/Session.pm view on Meta::CPAN
my %cookies = Apache::Cookie->fetch();
my $id = $cookies{SESSION_ID} && $cookies{SESSION_ID}->value();
my $t = time();
my $expired = $dbh->selectall_arrayref(q{select id from sessions where ? - unix_timestamp(modified) > ?}, $FIXUP, $t, $expire);
foreach (@$expired) {
tie %$_, $class, $_->{id}, { Handle => $dbh, LockHandle => $dbh };
tied(%$_)->on_end($_) if tied(%$_)->can('on_end');
tied(%$_)->delete();
}
Apache-LoadAvgLimit
view release on metacpan or search on metacpan
lib/Apache/LoadAvgLimit.pm \
blib/lib/Apache/LoadAvgLimit.pm
# --- MakeMaker platform_constants section:
MM_Unix_VERSION = 6.62
PERL_MALLOC_DEF = -DPERL_EXTMALLOC_DEF -Dmalloc=Perl_malloc -Dfree=Perl_mfree -Drealloc=Perl_realloc -Dcalloc=Perl_calloc
# --- MakeMaker tool_autosplit section:
# Usage: $(AUTOSPLITFILE) FileToSplit AutoDirToSplitInto
Apache-LoggedAuthDBI
view release on metacpan or search on metacpan
that happens if the handle is still marked as C<Active>.
Think of the name as meaning 'treat the handle as not-Active in the
DESTROY method'.
This attribute is specifically designed for use in Unix applications
that "fork" child processes. Either the parent or the child process,
but not both, should set C<InactiveDestroy> on all their shared handles.
Note that some databases, including Oracle, don't support passing a
database connection across a fork.
Note: There is a bug in perl 5.8.2 when configured with threads
and debugging enabled (bug #24463) which causes a DBI test to fail.
=head2 Signal Handling and Canceling Operations
[The following only applies to systems with unix-like signal handling.
I'd welcome additions for other systems, especially Windows.]
The first thing to say is that signal handling in Perl versions less
than 5.8 is I<not> safe. There is always a small risk of Perl
crashing and/or core dumping when, or after, handling a signal
stripped off from the name, and the number is used to set the trace
level. For example:
DBI_TRACE=1=dbitrace.log perl your_test_script.pl
On Unix-like systems using a Bourne-like shell, you can do this easily
on the command line:
DBI_TRACE=2 perl your_test_script.pl
See L</TRACING> for more information.
Apache-Logmonster
view release on metacpan or search on metacpan
bin/install_deps.pl view on Meta::CPAN
{ module => 'Date::Format' , info => { port => 'TimeDate' } },
{ module => 'Params::Validate' , info => {} },
{ module => 'Mail::Send' , info => { port => 'Mail::Tools' } },
{ module => 'Regexp::Log' , info => {} },
# { module => 'Mail::Toaster' , info => {} },
# { module => 'Provision::Unix' , info => {} },
],
'apps' => [
# { app => 'expat' , info => { port => 'expat2', dport=>'expat2' } },
# { app => 'gettext' , info => { port => 'gettext', dport=>'gettext'} },
# { app => 'gmake' , info => { port => 'gmake', dport=>'gmake' } },
bin/install_deps.pl view on Meta::CPAN
# this works around that annoying little habit
no warnings;
$CPAN::Config = get_cpan_config();
use warnings;
if ( $module eq 'Provision::Unix' && $version ) {
$module =~ s/\:\:/\-/g;
$module = "M/MS/MSIMERSON/$module-$version.tar.gz";
}
CPAN::Shell->install($module);
}
Apache-MP3
view release on metacpan or search on metacpan
use vars qw($VERSION);
$VERSION = '3.06';
my $CRLF = "\015\012";
use constant DIR_MAGIC_TYPE => 'httpd/unix-directory';
use constant DEBUG => 0;
# defaults:
use constant BASE_DIR => '/apache_mp3';
use constant STYLESHEET => 'apache_mp3.css';
Apache-MiniWiki
view release on metacpan or search on metacpan
MiniWiki.pm view on Meta::CPAN
my $lastmod = "never";
if (-f $filename) {
my $mtime = stat($filename)->mtime;
my $date = &ParseDateString("epoch $mtime");
$lastmod = &UnixDate($date, "%B %d, %Y %i:%M %p");
}
return "$lastmod";
}
MiniWiki.pm view on Meta::CPAN
# convert from RCS's GMT timestamps to PST.
my $fixedtime = &ParseDateString($datestamp);
my $delta = &ParseDateDelta("$timediff hours");
$fixedtime = &DateCalc($fixedtime, $delta);
my $nicetime = &UnixDate($fixedtime, "%i:%M %p");
$fixedtime = &UnixDate($fixedtime, "%Y/%m/%d %H:%M:%S");
my ($date, $time) = split (/\ /, $fixedtime);
my ($year, $month, $day) = split (/\//, $date);
$records->{$year}->{$month}->{$day}->{"$time"} = {
MiniWiki.pm view on Meta::CPAN
foreach my $year (reverse sort keys %{$records}) {
foreach my $month (reverse sort keys %{$records->{$year}}) {
foreach my $day (reverse sort keys %{$records->{$year}->{$month}}) {
my $date = &ParseDateString("$year$month$day");
$date = &UnixDate($date, "%B %d, %Y");
$changes .= " <b><i>$date</i></b><br/>\n";
foreach my $time (reverse sort keys %{$records->{$year}->{$month}->{$day}}) {
my $record = $records->{$year}->{$month}->{$day}->{$time};
my $nicetime = $record->{nicetime};
$changes .= qq|
Apache-NNTPGateway
view release on metacpan or search on metacpan
NNTPGateway.pm view on Meta::CPAN
$The_User eq 'guest' ||
$The_User eq 'admin' ||
$The_User eq 'root'
);
# 2/ Check username validity, by checking if a local (Unix) account
# exists for the user. This check is mainly for posting actions,
# the access protection is not handled in this module.
my $username = (getpwnam($The_User))[6];
# No password entry for this user consider it as anonymous
$The_User = undef if ( !$username && !&is_true( $r->dir_config( 'NNTPGatewayNonLocalPostOk' )));
Apache-PAR
view release on metacpan or search on metacpan
# XXX Add signature check here
# unpack the files
foreach my $member ($zip->members) {
# $member->fileName is always in Unix format
# See also Archive::Zip::_asLocalName()
my $file = File::Spec->catfile($tmppar, split('/', $member->fileName));
warn "[PAR] extracting '$file'\n" if DEBUG;
my $rv = $member->extractToFileNamed($file);
unless($rv == AZ_OK) {
print STDERR "Error extracting '$file' from '$par': error code: $rv";
return undef;
}
if ($member->fileAttributeFormat == 3) { # unix permissions
my $perms = $member->unixFileAttributes & 0xFFF;
unless(chmod $perms, $file) {
print STDERR "chmod $perms, $file failed: $!";
return undef;
}
}
=back
By default, if a web.conf file contains a C<##UNPACKDIR##> directive, the archive will be
unpacked to a subdirectory under PARTempDir during Apache startup. The default for
PARTempDir is the platform specific temp directory (e.g. c:\temp for win32, /tmp for *nix.)
Archive unpacking may be disabled by specifying C<PerlSetVar PARTempDir NONE> in the Apache
configuration, however this will prevent the loading of any PAR files which require
unpacking to operate.
Changed content in PAR files is not reloaded util the next restart of Apache unless the
Apache-PageKit
view release on metacpan or search on metacpan
lib/Apache/PageKit.pm view on Meta::CPAN
## return DECLINED;
}
sub _check_gzip {
my $pk = shift;
# check Accent-Encoding or if the user_agent field for Unix/Mac Netscape
# to see if should gzip output
my $gzip_output = $pk->{config}->get_global_attr("gzip_output") || 'none';
$pk->{use_gzip} = 'none';
my $apr = $pk->{apr};
if ($gzip_output =~ m!^(all|static)$!){
Apache-ParseLog
view release on metacpan or search on metacpan
t/samples/sample.error.log view on Meta::CPAN
[Sat Jun 20 02:37:14 1998] [notice] SIGHUP received. Attempting to restart
[Sat Jun 20 02:37:18 1998] [notice] Apache/1.3.0 (Unix) mod_perl/1.12 configured -- resuming normal operations
[Sat Jun 20 02:41:09 1998] [error] Undefined subroutine &Apache::Registry::handler called.
[Sat Jun 20 02:57:48 1998] [error] (2)No such file or directory: DateServlet: init
[Sat Jun 20 02:57:59 1998] [error] File does not exist: /usr/local/httpd/htdocs/seerver-info
[Sat Jun 20 03:04:35 1998] [error] (13)Permission denied: mod_mime_magic: can't read `/usr/local/httpd/htdocs/stockquotes/SQ.pl'
[Sat Jun 20 03:05:52 1998] [error] File does not exist: /usr/local/httpd/htdocs/images/menuts.gif
t/samples/sample.error.log view on Meta::CPAN
[Thu Aug 6 01:56:41 1998] [error] Premature end of script headers: /usr/local/httpd/htdocs/test/ASCII.cgi
[Mon Sep 21 22:34:58 1998] [warn] child process 29988 still did not exit, sending a SIGTERM
[Mon Sep 21 22:34:58 1998] [warn] child process 29989 still did not exit, sending a SIGTERM
[Mon Sep 21 22:34:58 1998] [warn] child process 29990 still did not exit, sending a SIGTERM
[Mon Sep 21 22:34:58 1998] [warn] child process 5 still did not exit, sending a SIGTERM
[Mon Sep 21 23:08:01 1998] [notice] Apache/1.3.1 (Unix) mod_perl/1.15 configured -- resuming normal operations
Apache-Reload
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
PREREQ_PM => \%prereqs,
dist => {
COMPRESS => 'gzip -9f', SUFFIX => 'gz',
PREOP => 'find $(DISTVNAME) -type d -print|xargs chmod 0755 && ' .
'find $(DISTVNAME) -type f -print|xargs chmod 0644',
TO_UNIX => 'find $(DISTVNAME) -type f -print|xargs dos2unix'
},
clean => { FILES => 't/TEST' },
);
### MAINTAINER_BUILDING_RELEASE is hack
Apache-SSI
view release on metacpan or search on metacpan
sub ACTION_test {
my $self = shift;
$self->depends_on('build');
# Could be File::Spec-ified, but this is mostly a Unix module
$self->add_to_cleanup(qw(t/httpd t/httpd.conf t/error_log));
$self->do_system('t/httpd', '-f', "%s/t/httpd.conf");
$ENV{PORT} = %s; # Used by the test scripts
eval { $self->SUPER::ACTION_test };
Apache-SdnFw
view release on metacpan or search on metacpan
lib/Apache/SdnFw/js/tinymce/changelog.txt view on Meta::CPAN
Fixed bug where the oninit callback wasn't executed correctly when the strict_loading_mode option was used, thanks goes to Nicholas Oxhoej.
Fixed bug where a access denied exception was thrown if some other script specified document.domain before loading TinyMCE.
Fixed so setting language to empty string will skip language loading if translations are made by some backend.
Fixed so dialog_type is automatically modal if you use the inlinepopups plugin use dialog_type : "window" to re-enable the old behavior.
Version 3.1.0.1 (2008-06-18)
Fixed bug where the Opera line break fix didn't work correctly on Mac OS X and Unix.
Fixed bug where IE was producing the default value the maxlength attribute of input elements.
Version 3.1.0 (2008-06-17)
Fixed bug where the paste as text didn't work correctly it encoded produced paragraphs and br elements.
Fixed bug where embed element in XHTML style didn't work correctly in the media plugin.
Fixed bug where style elements was forced empty in IE. The will now be wrapped in a comment just like script elements.
Apache-SecSess
view release on metacpan or search on metacpan
SecSess/DBI.pm view on Meta::CPAN
## get UNIX-style password hash
sub get_pwhash {
my $self = shift;
my($uid) = @_;
return $self->get_stored_token($uid, 'unixpw');
}
## get stored token
sub get_stored_token {
my $self = shift;
SecSess/DBI.pm view on Meta::CPAN
## this little extra step is necessary for crypt() to work
unless ($uid && $pw) { return 'empty'; }
my $pwhash = $self->get_pwhash($uid);
return $self->validate_stored_token($uid, crypt($pw, $pwhash), 'unixpw');
}
## validate a general stored token (eg, password, PIN, etc)
sub validate_stored_token {
my $self = shift;
SecSess/DBI.pm view on Meta::CPAN
$sth = $self->{dbh}->prepare(<<'ENDSQL');
UPDATE userauthen
SET token = ?
WHERE usrid = ? AND authid = ?
ENDSQL
$sth->execute($self->dbquote($hash), $uid, 'unixpw');
$sth->finish;
}
## return list of groups to which user belongs
sub get_groups {
Apache-Session-Generate-Random
view release on metacpan or search on metacpan
xt/author/eol.t view on Meta::CPAN
't/00-report-prereqs.t',
't/01-simple.t',
't/02-sessionx.t'
);
eol_unix_ok($_, { trailing_whitespace => 1 }) foreach @files;
done_testing;
Apache-Session-SQLite3
view release on metacpan or search on metacpan
inc/Module/Install/Metadata.pm view on Meta::CPAN
return $self;
}
sub version_from {
my ($self, $version_from) = @_;
require ExtUtils::MM_Unix;
$self->version(ExtUtils::MM_Unix->parse_version($version_from));
}
sub abstract_from {
my ($self, $abstract_from) = @_;
require ExtUtils::MM_Unix;
$self->abstract(
bless( { DISTNAME => $self->name }, 'ExtUtils::MM_Unix')
->parse_abstract($abstract_from)
);
}
1;
Apache-Session
view release on metacpan or search on metacpan
Mike Langen <mike.langen@tamedia.ch> contributed Informix modules.
FURTHER INFORMATION:
--------------------
Apache by Apache Group comp.infosystems.www.servers.unix
http://www.apache.org/
mod_perl by Doug MacEachern modperl@apache.org
http://perl.apache.org/
Apache-SetWWWTheme
view release on metacpan or search on metacpan
GETTING_STARTED view on Meta::CPAN
Welcome to Apache::SetWWWTheme! This file is a brief intro into getting
this module up and running on your system. There are a few requirements:
1) a unixish operating system. I developed on Solaris 2.6, and have
tested it on Linux. I don't foresee and sort of problems running it on
any other unix. VMS and/or Windows might be tricky though -- I'm quite
clueless about other operating systems. If you can get it going on these
platforms, please tell me!
2) The Apache webserver
Apache-SiteConfig
view release on metacpan or search on metacpan
inc/Module/Install/Can.pm view on Meta::CPAN
*ExtUtils::MM_Cygwin::maybe_command = sub {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i and ExtUtils::MM_Win32->can('maybe_command')) {
ExtUtils::MM_Win32->maybe_command($file);
} else {
ExtUtils::MM_Unix->maybe_command($file);
}
}
}
}
Apache-SizeLimit
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
PREREQ_PM => \%prereqs,
dist => {
COMPRESS => 'gzip -9f', SUFFIX => 'gz',
PREOP => 'find $(DISTVNAME) -type d -print|xargs chmod 0755 && ' .
'find $(DISTVNAME) -type f -print|xargs chmod 0644',
TO_UNIX => 'find $(DISTVNAME) -type f -print|xargs dos2unix'
},
clean => { FILES => 't/TEST' },
);
### MAINTAINER_BUILDING_RELEASE is hack
Apache-Solr
view release on metacpan or search on metacpan
lib/Apache/Solr.pm view on Meta::CPAN
my $dec = $result->decoded($self->decodeResponse($resp));
last if $resp->is_success;
if($resp->code==500)
{ $! = ENETDOWN; # HTTP(500) -> unix error
alert __x"Solr request failed with {code}, {retries} retries left",
code => $resp->code, retries => $retries, result => $result;
sleep $wait if $wait && $retries; # let remote settle a bit
next;
}
Apache-TS-AdminClient
view release on metacpan or search on metacpan
lib/Apache/TS/AdminClient.pm view on Meta::CPAN
my $self = shift;
return $self->close_socket();
}
#
# Open the socket (Unix domain)
#
sub open_socket {
my $self = shift;
my %args = @_;
lib/Apache/TS/AdminClient.pm view on Meta::CPAN
print "$string\n";
=head1 DESCRIPTION:
AdminClient opens a TCP connection to a unix domain socket on local disk. When the connection is established,
AdminClient will write requests to the socket and wait for Apache Traffic Server to return a response. Valid
request strings can be found in RecordsConfig.cc which is included with Apache Traffic Server source.
A list of valid request strings are included with this documentation, but this included list may not be complete
as future releases of Apache Traffic Server may include new request strings or remove existing ones.
=head1 OPTIONS
=head2 socket_path
When the object is created for this module, it assumes the 'Unix Domain Socket' is at the default location of
B<'/usr/local/var/trafficserver/cli'> This can be changed when creating the object by setting B<'socket_path'>. For example:
my $cli = AdminClient->new(socket_path=> "/dev/null");
would make the module look for the 'Unix Domain Socket' at /dev/null. Of course this isn't a realistic example, but can be used when
modified appropiately.
=head2 traffic_line
There is a command line tool included with Apache Traffic Server called traffic_line which overlaps with this module. traffic_line
Apache-Test
view release on metacpan or search on metacpan
lib/Apache/TestConfig.pm view on Meta::CPAN
my $perl_bin = $Config::Config{bin} || '';
push @dirs, $perl_bin if $perl_bin and -d $perl_bin;
for my $base (map { catfile $_, $program } @dirs) {
if ($ENV{HOME} and not WIN32) {
# only works on Unix, but that's normal:
# on Win32 the shell doesn't have special treatment of '~'
$base =~ s/~/$ENV{HOME}/o;
}
return $base if -x $base && -f _;
Apache-Tika-Async
view release on metacpan or search on metacpan
xt/99-minimumversion.t
xt/99-pod.t
xt/99-synopsis.t
xt/99-test-prerequisites.t
xt/99-todo.t
xt/99-unix-text.t
xt/99-versions.t
xt/meta-lint.t
Apache-UploadMeter
view release on metacpan or search on metacpan
lib/Apache/UploadMeter/Resources/JavaScript.pm view on Meta::CPAN
New in version 0.4: Support for CSS2 and CSS3 attribute selectors:
See http://www.w3.org/TR/css3-selectors/#attribute-selectors
Version 0.4 - Simon Willison, March 25th 2003
-- Works in Phoenix 0.5, Mozilla 1.3, Opera 7, Internet Explorer 6, Internet Explorer 5 on Windows
-- Opera 7 fails
*/
function getAllChildren(e) {
// Returns all children of element. Workaround required for IE5/Windows. Ugh.
Apache-WebDAV
view release on metacpan or search on metacpan
lib/Apache/WebDAV.pm view on Meta::CPAN
$info->{'getcontenttype'} = 'application/octet-stream';
$info->{'resourcetype'} = '';
if($handler->test('d', $path))
{
$info->{'getcontenttype'} = 'httpd/unix-directory';
$info->{'resourcetype'} = 'collection';
}
@stat{@properties} = $handler->stat($path);
Apache-WinBitHack
view release on metacpan or search on metacpan
WinBitHack.pm view on Meta::CPAN
sub XBitHack ($$$) {
my ($cfg, $parms, $arg) = @_;
# Let mod_include do the Unix stuff - we only do Win32.
return DECLINE_CMD unless $^O =~ m/Win32/;
if ($arg =~ m/^(On|Off|Full)$/i) {
$cfg->{_state} = uc($arg);
}
Apache-Wyrd
view release on metacpan or search on metacpan
General Public License for more details.
=head2 (GENERALLY) UNIX-Only
This software has only tested under Linux and Darwin, but should work
for any *nix-style system. This software is not intended for use on
windows or other delicate glassware.
=head2 Cross Scripting
This software is meant to run on mod_perl, which, unlike PHP for example, is
( run in 2.365 seconds using v1.01-cache-2.11-cpan-39bf76dae61 )