Result:
found more than 693 distributions - search limited to the first 2001 files matching your query ( run in 1.815 )


CPAN-Changes

 view release on metacpan or  search on metacpan

corpus/dists/Ubic.changes  view on Meta::CPAN

1.13    Wed Sep 01, 2010
        * Perl6::Slurp removed from dependencies
        * Ubic::Manual::FAQ now is actually added
        * group() method in services:
         - services can specify group(s) from which service should run, analogous to user() method
         - ubic will call setgid() before invoking any service methods
         - default group list consists only of main user's group, as returned by getpwnam; supplementary groups are not supported yet

1.12    Thu Aug 26, 2010
        * Ubic::Manual::FAQ with first 2 questions
        * Ubic::Log documentation updated according to 1.11 changes

 view all matches for this distribution


CPAN-Common-Index

 view release on metacpan or  search on metacpan

t/CPAN/modules/02packages.details.txt  view on Meta::CPAN

P5AST::op_ftpipe                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftrexec                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftrowned                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftrread                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftrwrite                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftsgid                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftsize                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftsock                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftsuid                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ftsvtx                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_fttext                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2

t/CPAN/modules/02packages.details.txt  view on Meta::CPAN

P5AST::op_getpgrp                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_getppid                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_getpriority             undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_getsockname             undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ggrent                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ggrgid                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ggrnam                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ghbyaddr                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ghbyname                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_ghostent                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
P5AST::op_glob                    undef  F/FL/FLORA/perl-5.17.4.tar.bz2

t/CPAN/modules/02packages.details.txt  view on Meta::CPAN

PLXML::op_ftpipe                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftrexec                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftrowned                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftrread                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftrwrite                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftsgid                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftsize                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftsock                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftsuid                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ftsvtx                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_fttext                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2

t/CPAN/modules/02packages.details.txt  view on Meta::CPAN

PLXML::op_getpgrp                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_getppid                 undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_getpriority             undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_getsockname             undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ggrent                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ggrgid                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ggrnam                  undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ghbyaddr                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ghbyname                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_ghostent                undef  F/FL/FLORA/perl-5.17.4.tar.bz2
PLXML::op_glob                    undef  F/FL/FLORA/perl-5.17.4.tar.bz2

 view all matches for this distribution


CPAN-MetaCurator

 view release on metacpan or  search on metacpan

data/tiddlers.json  view on Meta::CPAN

        "title": "JavaScript",
        "modified": "20260515013508807",
        "created": "20231130010232281"
    },
    {
        "text": "\"\"\"\no See also:\n- CryptoStuff\n- DataTraversal\n- FileHandling - For File::Raw::JSON\n- JavaScript\n- OrgDocHandling\n- TheRFCGuide\n- YamlStuff\n- CSS.and.Javascript.html - for jq and JSON::JQ\n- https://github.com/json-schema/...
        "title": "JsonStuff",
        "modified": "20260528235820589",
        "created": "20230425023754721"
    },
    {

 view all matches for this distribution


CPAN-ParseDistribution

 view release on metacpan or  search on metacpan

lib/CPAN/ParseDistribution.pm  view on Meta::CPAN

                 readline rcatline getc read formline enterwrite
                 leavewrite print sysread syswrite send recv eof
                 tell seek sysseek readdir telldir seekdir rewinddir
                 lock stat lstat readlink ftatime ftblk ftchr ftctime
                 ftdir fteexec fteowned fteread ftewrite ftfile ftis
                 ftlink ftmtime ftpipe ftrexec ftrowned ftrread ftsgid
                 ftsize ftsock ftsuid fttty ftzero ftrwrite ftsvtx
                 fttext ftbinary fileno ghbyname ghbyaddr ghostent
                 shostent ehostent gnbyname gnbyaddr gnetent snetent
                 enetent gpbyname gpbynumber gprotoent sprotoent
                 eprotoent gsbyname gsbyport gservent sservent
                 eservent  gpwnam gpwuid gpwent spwent epwent
                 getlogin ggrnam ggrgid ggrent sgrent egrent msgctl
                 msgget msgrcv msgsnd semctl semget semop shmctl
                 shmget shmread shmwrite require dofile caller
                 syscall dump chroot link unlink rename symlink
                 truncate backtick system fork wait waitpid glob
                 exec exit kill time tms mkdir rmdir utime chmod

 view all matches for this distribution


CPAN-Testers-ParseReport

 view release on metacpan or  search on metacpan

lib/CPAN/Testers/ParseReport.pm  view on Meta::CPAN

                if ($left eq '$UID/$EUID') {
                    my($uid,$euid) = split m{\s*/\s*}, $right;
                    $extract{'env:$UID'} = $uid;
                    $extract{'env:$EUID'} = $euid;
                } elsif ($left =~ /GID/) {
                    for my $xgid (uniq split " ", $right) {
                        $extract{"env:$left∋$xgid"} = "true";
                    }
                } else {
                    $extract{"env:$left"} = $right;
                }
            }

 view all matches for this distribution


CPAN-Testers-WWW-Admin

 view release on metacpan or  search on metacpan

vhost/cgi-bin/config/settings.ini  view on Meta::CPAN

webpath=
cgipath=/cgi-bin
realm=public
basedir=/var/www/cpanadmin
webdir=/var/www/cpanadmin/html
cgidir=/var/www/cpanadmin/cgi-bin

requests=/var/www/cpanadmin/cgi-bin/config/requests

[DATABASE]
driver=mysql

 view all matches for this distribution


CPAN-Testers-WWW-Blog

 view release on metacpan or  search on metacpan

vhost/cgi-bin/config/settings.ini  view on Meta::CPAN

webpath=
cgipath=/cgi-bin
realm=public
basedir=/var/www/cpanblog
webdir=/var/www/cpanblog/html
cgidir=/var/www/cpanblog/cgi-bin

requests=/var/www/cpanblog/cgi-bin/config/requests

[DATABASE]
driver=mysql

 view all matches for this distribution


CPAN-Testers-WWW-Preferences

 view release on metacpan or  search on metacpan

vhost/cgi-bin/config/settings.ini  view on Meta::CPAN

webpath=
cgipath=/cgi-bin
realm=public
basedir=/var/www/cpanprefs
webdir=/var/www/cpanprefs/html
cgidir=/var/www/cpanprefs/cgi-bin
cpan_config=/var/www/reports/cgi-bin/config/cpan-config.ini

requests=/var/www/cpanprefs/cgi-bin/config/requests

[DATABASE]

 view all matches for this distribution


CPAN-Testers-WWW-Reports

 view release on metacpan or  search on metacpan

vhost/cgi-bin/config/settings.ini  view on Meta::CPAN

webpath=
cgipath=/cgi-bin
realm=public
basedir=/var/www/reports
webdir=/var/www/reports/html
cgidir=/var/www/reports/cgi-bin
cpan_config=/var/www/reports/cgi-bin/config/cpan-config.ini
reportlink0=http://nntp.x.perl.org/group/perl.cpan.testers
reportlink=/cpan/report
reportlink2=http://www.cpantesters.org/cpan/report
#requests=/var/www/reports/cgi-bin/config/requests

 view all matches for this distribution


CPAN-Testers-WWW-Wiki

 view release on metacpan or  search on metacpan

vhost/cgi-bin/config/settings.ini  view on Meta::CPAN

webpath=
cgipath=/cgi-bin
realm=public
basedir=/var/www/cpanwiki
webdir=/var/www/cpanwiki/html
cgidir=/var/www/cpanwiki/cgi-bin
logfile=/var/www/cpanwiki/html/cache/audit.log

requests=/var/www/cpanwiki/cgi-bin/config/requests

[DATABASE]

 view all matches for this distribution


CPAN

 view release on metacpan or  search on metacpan

lib/CPAN/FTP.pm  view on Meta::CPAN

	chown $stat[4], $stat[5], $dest
	    or do {
		my $save_err = $!; # otherwise it's lost in the get... calls
		$CPAN::Frontend->mywarn("Can't chown '$dest' to " .
					(getpwuid($stat[4]))[0] . "/" .
					(getgrgid($stat[5]))[0] . ": $save_err\n"
				       );
	    };
    };
    warn $@ if $@;
}

lib/CPAN/FTP.pm  view on Meta::CPAN

        unless ($url =~ m|^ftp://(.*?)/(.*)/(.*)|) {
            next;
        }
        my($host,$dir,$getfile) = ($1,$2,$3);
        my $timestamp = 0;
        my($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,
            $ctime,$blksize,$blocks) = stat($aslocal);
        $timestamp = $mtime ||= 0;
        my($netrc) = CPAN::FTP::netrc->new;
        my($netrcfile) = $netrc->netrc;
        my($verbose) = $CPAN::DEBUG{'FTP'} & $CPAN::DEBUG ? " -v" : "";

lib/CPAN/FTP.pm  view on Meta::CPAN

$dialog
}
                );
                $self->talk_ftp("$ftpbin$verbose $host",
                                @dialog);
                ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
                    $atime,$mtime,$ctime,$blksize,$blocks) = stat($aslocal);
                $mtime ||= 0;
                if ($mtime > $timestamp) {
                    $CPAN::Frontend->myprint("GOT $aslocal\n");
                    $ThesiteURL = $ro_url;

lib/CPAN/FTP.pm  view on Meta::CPAN

  Sending the dialog
$dialog
}
        );
        $self->talk_ftp("$ftpbin$verbose -n", @dialog);
        ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
            $atime,$mtime,$ctime,$blksize,$blocks) = stat($aslocal);
        $mtime ||= 0;
        if ($mtime > $timestamp) {
            $CPAN::Frontend->myprint("GOT $aslocal\n");
            $ThesiteURL = $ro_url;

lib/CPAN/FTP.pm  view on Meta::CPAN

# find2perl needs modularization, too, all the following is stolen
# from there
# CPAN::FTP::ls
sub ls {
    my($self,$name) = @_;
    my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$sizemm,
     $atime,$mtime,$ctime,$blksize,$blocks) = lstat($name);

    my($perms,%user,%group);
    my $pname = $name;

lib/CPAN/FTP.pm  view on Meta::CPAN

    substr($tmp,5,1) =~ tr/-x/Ss/ if -g _;
    substr($tmp,8,1) =~ tr/-x/Tt/ if -k _;
    $perms .= $tmp;

    my $user = $user{$uid} || $uid;   # too lazy to implement lookup
    my $group = $group{$gid} || $gid;

    my($sec,$min,$hour,$mday,$mon,$year) = localtime($mtime);
    my($timeyear);
    my($moname) = $moname[$mon];
    if (-M _ > 365.25 / 2) {

 view all matches for this distribution


CPANPLUS-Dist-Debora

 view release on metacpan or  search on metacpan

lib/CPANPLUS/Dist/Debora/Package/Tar.pm  view on Meta::CPAN


    my %properties = (
        type  => DIR,
        mode  => oct '0755',
        uid   => 0,
        gid   => 0,
        uname => 'root',
        gname => 'root',
        mtime => $self->last_modification,
    );

 view all matches for this distribution


CPANPLUS-Dist-Slackware

 view release on metacpan or  search on metacpan

lib/CPANPLUS/Dist/Slackware.pm  view on Meta::CPAN

    }

    msg( loc( q{Creating package '%1'}, $outputname ) );

    my $orig_uid = $UID;
    my $orig_gid = ( split /\s+/, $GID )[0];
    if ($needs_chown) {
        my @stat = stat($destdir);
        if ( !@stat ) {
            error( loc( q{Could not stat '%1': %2}, $destdir, $OS_ERROR ) );
            return;
        }
        $orig_uid = $stat[4];
        $orig_gid = $stat[5];

        $dist->_chown_recursively( 0, 0, $destdir ) or return;
    }

    my $fail = 0;

lib/CPANPLUS/Dist/Slackware.pm  view on Meta::CPAN

        ++$fail;
    }

    if ($needs_chown) {
        if ( -d $destdir ) {
            if (!$dist->_chown_recursively( $orig_uid, $orig_gid, $destdir ) )
            {
                ++$fail;
            }
        }
        if ( -f $outputname ) {
            if (!$dist->_chown_recursively(
                    $orig_uid, $orig_gid, $outputname
                )
                )
            {
                ++$fail;
            }

lib/CPANPLUS/Dist/Slackware.pm  view on Meta::CPAN

    my $desc = $pkgdesc->slack_desc;
    return spurt( $descfile, $desc );
}

sub _chown_recursively {
    my ( $dist, $uid, $gid, @filenames ) = @_;

    my $module = $dist->parent;
    my $cb     = $module->parent;
    my $conf   = $cb->configure_object;

    my $cmd = [ '/bin/chown', '-R', "$uid:$gid", @filenames ];
    if ( $EFFECTIVE_USER_ID > 0 ) {
        my $sudo = $conf->get_program('sudo');
        if ($sudo) {
            unshift @{$cmd}, $sudo;
        }

 view all matches for this distribution


CPANPLUS

 view release on metacpan or  search on metacpan

inc/bundle/Archive/Tar.pm  view on Meta::CPAN

                    = File::Spec->splitpath( $cwd );
        my @cwd     = File::Spec->splitdir( $cwd_dir );
        push @cwd, $cwd_file if length $cwd_file;

        ### We need to pass '' as the last element to catpath. Craig Berry
        ### explains why (msgid <p0624083dc311ae541393@[172.16.52.1]>):
        ### The root problem is that splitpath on UNIX always returns the
        ### final path element as a file even if it is a directory, and of
        ### course there is no way it can know the difference without checking
        ### against the filesystem, which it is documented as not doing.  When
        ### you turn around and call catpath, on VMS you have to know which bits

inc/bundle/Archive/Tar.pm  view on Meta::CPAN

        ### not to the owner of the directory itself, which may or may not
        ### be another entry in the archive
        ### Answer: no, gnu tar doesn't do it either, it'd be the wrong
        ### way to go.
        #if( $CHOWN && CAN_CHOWN ) {
        #    chown $entry->uid, $entry->gid, $dir or
        #        $self->_error( qq[Could not set uid/gid on '$dir'] );
        #}
    }

    ### we're done if we just needed to create a dir ###
    return 1 if $entry->is_dir;

inc/bundle/Archive/Tar.pm  view on Meta::CPAN

        utime time, $entry->mtime - TIME_OFFSET, $full or
            $self->_error( qq[Could not update timestamp] );
    }

    if( $CHOWN && CAN_CHOWN->() and not -l $full ) {
        CORE::chown( $entry->uid, $entry->gid, $full ) or
            $self->_error( qq[Could not set uid/gid on '$full'] );
    }

    ### only chmod if we're allowed to, but never chmod symlinks, since they'll
    ### change the perms on the file they're linking too...
    if( $CHMOD and not -l $full ) {

inc/bundle/Archive/Tar.pm  view on Meta::CPAN

Returns a list of the names of all the files in the archive.

If C<list_files()> is passed an array reference as its first argument
it returns a list of hash references containing the requested
properties of each file.  The following list of properties is
supported: name, size, mtime (last modified date), mode, uid, gid,
linkname, uname, gname, devmajor, devminor, prefix.

Passing an array reference containing only one element, 'name', is
special cased to return a list of names rather than a list of hash
references, making it equivalent to calling C<list_files> without

inc/bundle/Archive/Tar.pm  view on Meta::CPAN

    ### this might be optimizable with a 'changed' flag in the file objects ###
    my $tar = pack (
                PACK,
                $file,

                (map { sprintf( $f1, $entry->$_() ) } qw[mode uid gid]),
                (map { sprintf( $f2, $entry->$_() ) } qw[size mtime]),

                "",  # checksum field - space padded a bit down

                (map { $entry->$_() }                 qw[type linkname magic]),

inc/bundle/Archive/Tar.pm  view on Meta::CPAN

a hash with specific options.

Will add a file to the in-memory archive, with name C<$filename> and
content C<$data>. Specific properties can be set using C<$opthashref>.
The following list of properties is supported: name, size, mtime
(last modified date), mode, uid, gid, linkname, uname, gname,
devmajor, devminor, prefix, type.  (On MacOS, the file's path and
modification times are converted to Unix equivalents.)

Valid values for the file type are the following constants defined by
Archive::Tar::Constant:

inc/bundle/Archive/Tar.pm  view on Meta::CPAN


If C<list_archive()> is passed an array reference as its third
argument it returns a list of hash references containing the requested
properties of each file.  The following list of properties is
supported: full_path, name, size, mtime (last modified date), mode,
uid, gid, linkname, uname, gname, devmajor, devminor, prefix, type.

See C<Archive::Tar::File> for details about supported properties.

Passing an array reference containing only one element, 'name', is
special cased to return a list of names rather than a list of hash

 view all matches for this distribution


CPANSA-DB

 view release on metacpan or  search on metacpan

lib/CPAN/Audit/DB.pm  view on Meta::CPAN

use warnings;

our $VERSION = '20260531.001';

sub db {
	{"dists" => {"ActivePerl" => {"advisories" => [{"affected_versions" => ["==5.16.1.1601"],"cves" => ["CVE-2012-5377"],"description" => "Untrusted search path vulnerability in the installation functionality in ActivePerl 5.16.1.1601, when installed in...
}

__PACKAGE__;

 view all matches for this distribution


CPU-x86_64-InstructionWriter

 view release on metacpan or  search on metacpan

lib/CPU/x86_64/InstructionWriter.pm  view on Meta::CPAN

}

sub _append_op128_xreg_reg {
	my ($self, $prefix, $rex, $opcode, $xreg, $reg)= @_;
	$xreg= $regnum128{$xreg} // croak("$xreg is not a 128-bit register");
	if (defined(my $regid= $regnum64{$reg})) {
		$rex |= 8;
		$reg= $regid;
	} elsif (defined($regid= $regnum32{$reg})) {
		$reg= $regid;
	} else {
		croak("$reg is not a 32 or 64-bit register");
	}
	$rex |= ($xreg & 8) >> 1 | ($reg & 8) >> 3;
	my $modrm= 0xC0 | ($xreg & 7) << 3 | ($reg & 7);

 view all matches for this distribution


CSS-Compressor

 view release on metacpan or  search on metacpan

Compressor.pm  view on Meta::CPAN

    border-right
    border-bottom
    border-right
    outline
    background
    progid:DXImageTransform.Microsoft.Alpha(Opacity=
];

# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
#  compress
#

 view all matches for this distribution


CSS-LESS-Filter

 view release on metacpan or  search on metacpan

lib/CSS/LESS/Filter.pm  view on Meta::CPAN

    { debug($thisline, @item); $return = join'', @item[1..2] }

unicode_range: /U\+[0-9a-fA-F?]{1,6}/
  { debug($thisline, @item); $return = $item[1] }

iefilter: 'progid:DXImageTransform.Microsoft.' ident parens
  { debug($thisline, @item); $return = join'', @item[1..3] }

javascript: /~?`[^`]+?`/s
  { debug($thisline, @item); $return = $item[1] }

 view all matches for this distribution


CSS-Prepare

 view release on metacpan or  search on metacpan

lib/CSS/Prepare/Plugin/Opacity.pm  view on Meta::CPAN

    my $property = shift;
    my $value    = shift;
    
    if ( '-cp-opacity' eq $property ) {
        my $ms_opacity    = $value * 100;
        my $ms_filter     = 'progid:DXImageTransform.Microsoft.'
                            . "Alpha(Opacity=${ms_opacity})";
        my $legacy_filter = "alpha(opacity=${ms_opacity})";
        
        return [
                {

lib/CSS/Prepare/Plugin/Opacity.pm  view on Meta::CPAN

    #overlay { -cp-opacity: 0.5; }

will be output as:

    #overlay {
        -ms-filter: progid:DXImageTransform.Microsoft.Alpha(Opacity=50);
        opacity:    0.5;
        *filter:    alpha(opacity=50);
    }

 view all matches for this distribution


CSS-Sass

 view release on metacpan or  search on metacpan

libsass/constants.cpp  view on Meta::CPAN

    extern const char url_kwd[]          = "url(";
    extern const char important_kwd[]    = "important";
    extern const char pseudo_not_kwd[]   = ":not(";
    extern const char even_kwd[]         = "even";
    extern const char odd_kwd[]          = "odd";
    extern const char progid_kwd[]       = "progid";
    extern const char expression_kwd[]   = "expression";
    extern const char calc_kwd[]         = "calc(";
    extern const char moz_calc_kwd[]     = "-moz-calc(";
    extern const char webkit_calc_kwd[]  = "-webkit-calc(";
    extern const char ms_calc_kwd[]      = "-ms-calc(";

 view all matches for this distribution


CSS-Watcher

 view release on metacpan or  search on metacpan

lib/CSS/Watcher/Monitor.pm  view on Meta::CPAN

use File::Spec;
use Fcntl ':mode';
use List::MoreUtils qw(any);

our @STAT_FIELDS = qw(
                         dev inode mode num_links uid gid rdev size atime mtime ctime
                         blk_size blocks
             );

sub new {
    my $class= shift;

 view all matches for this distribution


CTKlib

 view release on metacpan or  search on metacpan

lib/CTK/App.pm  view on Meta::CPAN

        my $logfile = defined($args->{logfile}) ? $self->logfile : lvalue($config->get("logfile")); # From args or config
        $logopts->{facility} = $args->{logfacility} if defined($args->{logfacility});  # From args only!
        $logopts->{file} = $logfile if defined($logfile) && length($logfile);
        $logopts->{ident} = defined($args->{ident})
            ? $args->{ident}
            : (lvalue($config->get("logident")) // $self->project); # From args or config
        $logopts->{level} = defined($args->{loglevel})
            ? $args->{loglevel}
            : lvalue($config->get("loglevel")); # From args or config
        $self->logger_init(%$logopts) or do {
            $self->error("Can't initialize logger");

 view all matches for this distribution


CaCORE

 view release on metacpan or  search on metacpan

examples/caBIOtest.pl  view on Meta::CPAN

#
print "test CaBIO 1: query by Big Id\n";

# instantiate a SecurityToken domain object and sets the value of symbol attribute to NAT2.
$gene = new CaCORE::CaBIO::Gene;
$gene->setBigid("hdl://2500.1.PMEUQUCCL5/ONSXKL4KEL");

# the eval...warn... construct is recommended, if error is encountered during webservice call, this will
# trap the exception and allows for error handling, and prevent the program from exiting.
eval{
	#

 view all matches for this distribution


Cache-Repository

 view release on metacpan or  search on metacpan

lib/Cache/Repository.pm  view on Meta::CPAN

            my %file_opts = (
                             filename => $repositoryname,
                             filehandle => $fh,
                             mode => $s->mode(),
                             owner => $s->uid(),
                             group => $s->gid(),
                            );
            $self->add_filehandle(tag => $opts{tag}, %file_opts) or return 0;
        }
        unlink($f) if $opts{move};
    }

 view all matches for this distribution


Calendar-Model

 view release on metacpan or  search on metacpan

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -moz-linear-gradient(top, #ffffff, #ffffff 25%, #e6e6e6);
  background-image: -ms-linear-gradient(#ffffff, #ffffff 25%, #e6e6e6);
  background-image: -o-linear-gradient(#ffffff, #ffffff 25%, #e6e6e6);
  background-image: linear-gradient(#ffffff, #ffffff 25%, #e6e6e6);
  background-repeat: no-repeat;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ffffff', endColorstr='#e6e6e6', GradientType=0);
  border: 1px solid #ccc;
  border-bottom-color: #bbb;
  -webkit-border-radius: 4px;
  -moz-border-radius: 4px;
  border-radius: 4px;

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#0088cc), to(#0044cc));
  background-image: -webkit-linear-gradient(top, #0088cc, #0044cc);
  background-image: -o-linear-gradient(top, #0088cc, #0044cc);
  background-image: linear-gradient(top, #0088cc, #0044cc);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#0088cc', endColorstr='#0044cc', GradientType=0);
  border-color: #0044cc #0044cc #002a80;
  border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
  filter: progid:DXImageTransform.Microsoft.gradient(enabled = false);
}
.btn-primary:hover,
.btn-primary:active,
.btn-primary.active,
.btn-primary.disabled,

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#fbb450), to(#f89406));
  background-image: -webkit-linear-gradient(top, #fbb450, #f89406);
  background-image: -o-linear-gradient(top, #fbb450, #f89406);
  background-image: linear-gradient(top, #fbb450, #f89406);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#fbb450', endColorstr='#f89406', GradientType=0);
  border-color: #f89406 #f89406 #ad6704;
  border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
  filter: progid:DXImageTransform.Microsoft.gradient(enabled = false);
}
.btn-warning:hover,
.btn-warning:active,
.btn-warning.active,
.btn-warning.disabled,

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#ee5f5b), to(#bd362f));
  background-image: -webkit-linear-gradient(top, #ee5f5b, #bd362f);
  background-image: -o-linear-gradient(top, #ee5f5b, #bd362f);
  background-image: linear-gradient(top, #ee5f5b, #bd362f);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ee5f5b', endColorstr='#bd362f', GradientType=0);
  border-color: #bd362f #bd362f #802420;
  border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
  filter: progid:DXImageTransform.Microsoft.gradient(enabled = false);
}
.btn-danger:hover,
.btn-danger:active,
.btn-danger.active,
.btn-danger.disabled,

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#62c462), to(#51a351));
  background-image: -webkit-linear-gradient(top, #62c462, #51a351);
  background-image: -o-linear-gradient(top, #62c462, #51a351);
  background-image: linear-gradient(top, #62c462, #51a351);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#62c462', endColorstr='#51a351', GradientType=0);
  border-color: #51a351 #51a351 #387038;
  border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
  filter: progid:DXImageTransform.Microsoft.gradient(enabled = false);
}
.btn-success:hover,
.btn-success:active,
.btn-success.active,
.btn-success.disabled,

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#5bc0de), to(#2f96b4));
  background-image: -webkit-linear-gradient(top, #5bc0de, #2f96b4);
  background-image: -o-linear-gradient(top, #5bc0de, #2f96b4);
  background-image: linear-gradient(top, #5bc0de, #2f96b4);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#5bc0de', endColorstr='#2f96b4', GradientType=0);
  border-color: #2f96b4 #2f96b4 #1f6377;
  border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
  filter: progid:DXImageTransform.Microsoft.gradient(enabled = false);
}
.btn-info:hover,
.btn-info:active,
.btn-info.active,
.btn-info.disabled,

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#333333), to(#222222));
  background-image: -webkit-linear-gradient(top, #333333, #222222);
  background-image: -o-linear-gradient(top, #333333, #222222);
  background-image: linear-gradient(top, #333333, #222222);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#333333', endColorstr='#222222', GradientType=0);
  -webkit-border-radius: 4px;
  -moz-border-radius: 4px;
  border-radius: 4px;
  -webkit-box-shadow: 0 1px 3px rgba(0, 0, 0, 0.25), inset 0 -1px 0 rgba(0, 0, 0, 0.1);
  -moz-box-shadow: 0 1px 3px rgba(0, 0, 0, 0.25), inset 0 -1px 0 rgba(0, 0, 0, 0.1);

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#333333), to(#222222));
  background-image: -webkit-linear-gradient(top, #333333, #222222);
  background-image: -o-linear-gradient(top, #333333, #222222);
  background-image: linear-gradient(top, #333333, #222222);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#333333', endColorstr='#222222', GradientType=0);
  border-color: #222222 #222222 #000000;
  border-color: rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.1) rgba(0, 0, 0, 0.25);
  filter: progid:DXImageTransform.Microsoft.gradient(enabled = false);
  -webkit-box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.1), 0 1px 0 rgba(255, 255, 255, 0.075);
  -moz-box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.1), 0 1px 0 rgba(255, 255, 255, 0.075);
  box-shadow: inset 0 1px 0 rgba(255, 255, 255, 0.1), 0 1px 0 rgba(255, 255, 255, 0.075);
}
.btn-navbar:hover,

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#ffffff), to(#f5f5f5));
  background-image: -webkit-linear-gradient(top, #ffffff, #f5f5f5);
  background-image: -o-linear-gradient(top, #ffffff, #f5f5f5);
  background-image: linear-gradient(top, #ffffff, #f5f5f5);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ffffff', endColorstr='#f5f5f5', GradientType=0);
  border: 1px solid #ddd;
  -webkit-border-radius: 3px;
  -moz-border-radius: 3px;
  border-radius: 3px;
  -webkit-box-shadow: inset 0 1px 0 #ffffff;

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#f5f5f5), to(#f9f9f9));
  background-image: -webkit-linear-gradient(top, #f5f5f5, #f9f9f9);
  background-image: -o-linear-gradient(top, #f5f5f5, #f9f9f9);
  background-image: linear-gradient(top, #f5f5f5, #f9f9f9);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#f5f5f5', endColorstr='#f9f9f9', GradientType=0);
  -webkit-box-shadow: inset 0 1px 2px rgba(0, 0, 0, 0.1);
  -moz-box-shadow: inset 0 1px 2px rgba(0, 0, 0, 0.1);
  box-shadow: inset 0 1px 2px rgba(0, 0, 0, 0.1);
  -webkit-border-radius: 4px;
  -moz-border-radius: 4px;

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#149bdf), to(#0480be));
  background-image: -webkit-linear-gradient(top, #149bdf, #0480be);
  background-image: -o-linear-gradient(top, #149bdf, #0480be);
  background-image: linear-gradient(top, #149bdf, #0480be);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#149bdf', endColorstr='#0480be', GradientType=0);
  -webkit-box-shadow: inset 0 -1px 0 rgba(0, 0, 0, 0.15);
  -moz-box-shadow: inset 0 -1px 0 rgba(0, 0, 0, 0.15);
  box-shadow: inset 0 -1px 0 rgba(0, 0, 0, 0.15);
  -webkit-box-sizing: border-box;
  -moz-box-sizing: border-box;

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#ee5f5b), to(#c43c35));
  background-image: -webkit-linear-gradient(top, #ee5f5b, #c43c35);
  background-image: -o-linear-gradient(top, #ee5f5b, #c43c35);
  background-image: linear-gradient(top, #ee5f5b, #c43c35);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ee5f5b', endColorstr='#c43c35', GradientType=0);
}
.progress-danger.progress-striped .bar {
  background-color: #ee5f5b;
  background-image: -webkit-gradient(linear, 0 100%, 100% 0, color-stop(0.25, rgba(255, 255, 255, 0.15)), color-stop(0.25, transparent), color-stop(0.5, transparent), color-stop(0.5, rgba(255, 255, 255, 0.15)), color-stop(0.75, rgba(255, 255, 255, 0....
  background-image: -webkit-linear-gradient(-45deg, rgba(255, 255, 255, 0.15) 25%, transparent 25%, transparent 50%, rgba(255, 255, 255, 0.15) 50%, rgba(255, 255, 255, 0.15) 75%, transparent 75%, transparent);

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#62c462), to(#57a957));
  background-image: -webkit-linear-gradient(top, #62c462, #57a957);
  background-image: -o-linear-gradient(top, #62c462, #57a957);
  background-image: linear-gradient(top, #62c462, #57a957);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#62c462', endColorstr='#57a957', GradientType=0);
}
.progress-success.progress-striped .bar {
  background-color: #62c462;
  background-image: -webkit-gradient(linear, 0 100%, 100% 0, color-stop(0.25, rgba(255, 255, 255, 0.15)), color-stop(0.25, transparent), color-stop(0.5, transparent), color-stop(0.5, rgba(255, 255, 255, 0.15)), color-stop(0.75, rgba(255, 255, 255, 0....
  background-image: -webkit-linear-gradient(-45deg, rgba(255, 255, 255, 0.15) 25%, transparent 25%, transparent 50%, rgba(255, 255, 255, 0.15) 50%, rgba(255, 255, 255, 0.15) 75%, transparent 75%, transparent);

examples/css/bootstrap.css  view on Meta::CPAN

  background-image: -webkit-gradient(linear, 0 0, 0 100%, from(#5bc0de), to(#339bb9));
  background-image: -webkit-linear-gradient(top, #5bc0de, #339bb9);
  background-image: -o-linear-gradient(top, #5bc0de, #339bb9);
  background-image: linear-gradient(top, #5bc0de, #339bb9);
  background-repeat: repeat-x;
  filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#5bc0de', endColorstr='#339bb9', GradientType=0);
}
.progress-info.progress-striped .bar {
  background-color: #5bc0de;
  background-image: -webkit-gradient(linear, 0 100%, 100% 0, color-stop(0.25, rgba(255, 255, 255, 0.15)), color-stop(0.25, transparent), color-stop(0.5, transparent), color-stop(0.5, rgba(255, 255, 255, 0.15)), color-stop(0.75, rgba(255, 255, 255, 0....
  background-image: -webkit-linear-gradient(-45deg, rgba(255, 255, 255, 0.15) 25%, transparent 25%, transparent 50%, rgba(255, 255, 255, 0.15) 50%, rgba(255, 255, 255, 0.15) 75%, transparent 75%, transparent);

 view all matches for this distribution


CallBackery

 view release on metacpan or  search on metacpan

lib/CallBackery/Config.pm  view on Meta::CPAN

        $lang =~ s/_.+//;
        local $_; # since load_file_ashash modifies $_ and does not localize it
        my $href = Locale::PO->load_file_ashash($file, 'utf8');
        for my $key (keys %$href) {
            my $o = $href->{$key};
            my $id  = $po->dequote($o->msgid);
            my $str = $po->dequote($o->msgstr);
            next unless $id;
            $lx{$locale}{$id} = $str;
        }
    }

 view all matches for this distribution


Captive-Portal

 view release on metacpan or  search on metacpan

lib/Captive/Portal/Role/Utils.pm  view on Meta::CPAN

    return $ip_packed_unpacked;
}

=item $capo->drop_privileges()

Running under root, like normal cronjobs do, should drop to the same uid/gid as the http daemon (and fcgi script). uid/gid is taken from config as RUN_USER/RUN_GROUP.

=cut

sub drop_privileges {
    my $self = shift;

lib/Captive/Portal/Role/Utils.pm  view on Meta::CPAN

    unless ( defined($uname) and defined($uid) ) {
        LOGDIE "user '$user' not known to system\n";
    }

    ########
    # resolve group to groupname and/or gid
    my ( $gname, $gid );

    if ( $group =~ m/^\d+$/ ) {
        $gname = getgrgid($group);
        $gid   = $group;
    }
    else {
        $gid   = getgrnam($group);
        $gname = $group;
    }

    unless ( defined($gname) and defined($gid) ) {
        LOGDIE "group '$group' not known to system\n";
    }

    # switch to user:group not needed
    # already running under required uid:gid
    return if $> == $uid && $) == $gid;

    DEBUG "switch GID and EGID to $gid";

    $( = $) = $gid;
    LOGDIE "cannot change group to '$group': $!\n"
      if $) != $gid;

    DEBUG "switch UID and EUID to $uid";

    $< = $> = $uid;
    LOGDIE "cannot change user to '$user': $!\n"

 view all matches for this distribution


Carrot

 view release on metacpan or  search on metacpan

lib/Carrot/Individuality/Singular/Process/Child.pm  view on Meta::CPAN

		$timeout -= 1;
	}
	return(kill(9, $$this));
}

sub set_ugid
# /type method
# /effect ""
# //parameters
#	uid
#	gid
# //returns
{
	my ($this, $uid, $gid) = @ARGUMENTS;

	if (defined($uid) and ($REAL_USER_ID != $EFFECTIVE_USER_ID))
	{
		my $former = $REAL_USER_ID;
		$REAL_USER_ID = $uid;

lib/Carrot/Individuality/Singular/Process/Child.pm  view on Meta::CPAN

				 'former_xid' => $former,
				 'os_error' => $OS_ERROR},
				ERROR_CATEGORY_SETUP);
		}
	}
	if (defined($gid) and ($REAL_GROUP_ID != $EFFECTIVE_GROUP_ID))
	{
		my $former = $REAL_GROUP_ID;
		$REAL_GROUP_ID = $gid;
		if ($OS_ERROR > 0)
		{
			$perl_setxid_failed->raise_exception(
				{+HKY_DEX_BACKTRACK => $gid,
				 'x' => 'g',
				 'xid' => $gid,
				 'former_xid' => $former,
				 'os_error' => $OS_ERROR},
				ERROR_CATEGORY_SETUP);
		}
	}
	return;
}

sub set_eugid
# /type method
# /effect ""
# //parameters
#	uid
#	gid
# //returns
{
	my ($this, $uid, $gid) = @ARGUMENTS;

	if (defined($uid) and ($EFFECTIVE_USER_ID != $uid))
	{
		my $former = $EFFECTIVE_USER_ID;
		$EFFECTIVE_USER_ID = $uid;

lib/Carrot/Individuality/Singular/Process/Child.pm  view on Meta::CPAN

				 'former_xid' => $former,
				 'os_error' => $OS_ERROR},
				ERROR_CATEGORY_SETUP);
		}
	}
	if (defined($gid) and ($EFFECTIVE_GROUP_ID != $gid))
	{
		my $former = $);
		$EFFECTIVE_GROUP_ID = $gid;
		if ($OS_ERROR > 0)
		{
			$perl_setxid_failed->raise_exception(
				{+HKY_DEX_BACKTRACK => $gid,
				 'x' => 'g',
				 'xid' => $gid,
				 'former_xid' => $former,
				 'os_error' => $OS_ERROR},
				ERROR_CATEGORY_SETUP);
		}
	}
	return;
}

sub swap_eugid
# function ()
{
	if ($REAL_USER_ID != $EFFECTIVE_USER_ID)
	{
		($REAL_USER_ID, $EFFECTIVE_USER_ID) = ($EFFECTIVE_USER_ID, $REAL_USER_ID);

lib/Carrot/Individuality/Singular/Process/Child.pm  view on Meta::CPAN

		}
	}
	return;
}

sub release_eugid
# function ()
{
	if ($REAL_USER_ID != $EFFECTIVE_USER_ID)
	{
		$REAL_USER_ID = $EFFECTIVE_USER_ID;

 view all matches for this distribution


Catalog

 view release on metacpan or  search on metacpan

conf/lib.pl  view on Meta::CPAN

# #
# # Mapping between configuration label and environment variables
# #
# conf_env(
#	      'infodir' => 'INFODIR',
#	      'cgidir' => 'CGIDIR',
#	      'cgipath' => 'CGIPATH',
#	      'config_dir' => 'CONFIG_DIR',
#	      'use_config' => 'USE_CONFIG',
#	      'htmldir' => 'HTMLDIR',
#	      'htmlpath' => 'HTMLPATH',

conf/lib.pl  view on Meta::CPAN

# # Get configuration parameters
# #
# sub install_ask {
#    my($install_conf) = load_config("install.conf");
#
#    getparam('cgidir', $install_conf,
#	    {
#		'prompt' => "
#The absolute pathname of the directory where the cgi-bin
#scripts will be installed",
#                'mandatory' => 1,

 view all matches for this distribution


Catalyst-Authentication-Store-LDAP

 view release on metacpan or  search on metacpan

lib/Catalyst/Authentication/Store/LDAP/User.pm  view on Meta::CPAN

    dn: cn=adam,ou=users,dc=yourcompany,dc=com
    cn: adam
    loginShell: /bin/zsh
    homeDirectory: /home/adam
    gecos: Adam Jacob
    gidNumber: 100
    uidNumber: 1053
    mail: adam@yourcompany.com
    uid: adam
    givenName: Adam
    sn: Jacob

 view all matches for this distribution


( run in 1.815 second using v1.01-cache-2.11-cpan-ceb78f64989 )