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


Language-Befunge

 view release on metacpan or  search on metacpan

lib/Language/Befunge/doc/bf98-specs.html  view on Meta::CPAN


<p>Befunge-93 source files are plain text files containing only printable
ASCII characters and the end-of-line controls described below.

<p>Funge-98 source files are made up of Funge characters.  The
Funge-98 character set overlays the ASCII subset used by Befunge-93
and may have characters greater than 127 present in it (and greater
than 255 on systems where characters are stored in multiple bytes;
but no greater than 2,147,483,647.)  The Funge character set is 'display-independent.'
That is to say, character #417 may look like a squiggle on system
Foo and a happy face on system Bar, but the meaning is always the

lib/Language/Befunge/doc/bf98-specs.html  view on Meta::CPAN

completely wipes the stack (popping and discarding elements
until it is empty.)

<hr><a name="Stack_Stack_Manipulation"><h3>Stack Stack Manipulation</h3>

<p>The stack stack transparently overlays
the stack - that is to say, the top stack of
Funge-98's stack stack is treated the same as
Befunge-93's sole stack.  The Funge programmer
will never notice the difference unless they
use the <code>{</code>, <code>}</code>, or <code>u</code>

 view all matches for this distribution


Language-FormulaEngine

 view release on metacpan or  search on metacpan

lib/Language/FormulaEngine/Compiler.pm  view on Meta::CPAN

The Compiler object takes a parse tree and generates perl code from it, and also evals
that perl code into a compiled coderef.  However, most of the code generation is handled
by the L<Language::FormulaEngine::Namespace> object.  The namespace object must be
available during compilation.  In the default scenario, the namespace object will be
consulted for default constants and "global" variables, and then the generated coderef
will accept additional variables to overlay on those global variables, but the Namespace
will still get to determine how to access that pool of combined variables at execution.

For alternative strategies, see the C<output_api> attribute below.

=head1 ATTRIBUTES

 view all matches for this distribution


Language-Haskell

 view release on metacpan or  search on metacpan

hugs98-Nov2003/fptools/libraries/GLUT/Graphics/UI/GLUT.hs  view on Meta::CPAN

--
-- * Utility routines to generate various solid and wire frame objects.
--
-- * Support for bitmap and stroke fonts.
--
-- * Miscellaneous window management functions, including managing overlays.
--
-- This documentation serves as both a specification and a programming guide.
-- If you are interested in a brief introduction to programming with GLUT,
-- have a look at the relevant parts of <http://www.opengl.org/> and the vast
-- amount of books on OpenGL, most of them use GLUT.

hugs98-Nov2003/fptools/libraries/GLUT/Graphics/UI/GLUT.hs  view on Meta::CPAN

-- the @tk@ and @aux@ toolkits. The @aux@ toolkit is used in the examples found
-- in the /OpenGL Programming Guide/. Unfortunately, @aux@ has numerous
-- limitations and its utility is largely limited to toy programs. The @tk@
-- library has more functionality than @aux@ but was developed in an /ad hoc/
-- fashion and still lacks much important functionality that IRIS GL programmers
-- expect, like pop-up menus and overlays.
--
-- GLUT is designed to fill the need for a window system independent programming
-- interface for OpenGL programs. The interface is designed to be simple yet
-- still meet the needs of useful OpenGL programs. Features from the IRIS GL,
-- @aux@, and @tk@ interfaces are included to make it easy for programmers used

hugs98-Nov2003/fptools/libraries/GLUT/Graphics/UI/GLUT.hs  view on Meta::CPAN

--   loop. This routine never returns, and it continuously calls GLUT callbacks
--   as necessary.
--
-- * /Window Management:/ These routines create and control windows.
--
-- * /Overlay Management:/ These routines establish and manage overlays for
--   windows.
--
-- * /Menu Management:/ These routines create and control pop-up menus.
--
-- * /Callback Registration:/ These routines register callbacks to be called by

hugs98-Nov2003/fptools/libraries/GLUT/Graphics/UI/GLUT.hs  view on Meta::CPAN

--   attributed to a window.
--
-- * /Idle:/ A state when no window system events are received for processing
--   as callbacks and the idle callback, if one is registered, is called.
--
-- * /Layer in use:/ Either the normal plane or overlay. This per-window state
--   determines what frame buffer layer OpenGL commands affect.
--
-- * /Menu entry:/ A menu item that the user can select to trigger the menu
--   callback for the menu entry\'s value.
--

hugs98-Nov2003/fptools/libraries/GLUT/Graphics/UI/GLUT.hs  view on Meta::CPAN

--   of samples (each containing color and depth information). The samples are
--   averaged to determine the displayed pixel color value. Multisampling is
--   supported as an extension to OpenGL.
--
-- * /Normal plane:/ The default frame buffer layer where GLUT window state
--   resides; as opposed to the /overlay/.
--
-- * /Overlay:/ A frame buffer layer that can be displayed preferentially to
--   the /normal plane/ and supports transparency to display through to the
--   /normal plane/. Overlays are useful for rubber-banding effects, text
--   annotation, and other operations, to avoid damaging the normal plane frame

 view all matches for this distribution


Lemonldap-Handlers-Generic

 view release on metacpan or  search on metacpan

doc/AuthorizationHeader.html.en  view on Meta::CPAN


	<li><a href="#name">NAME</a></li>
	<li><a href="#description">DESCRIPTION</a></li>
	<ul>

		<li><a href="#overlay">Overlay</a></li>
	</ul>

	<li><a href="#see_also">SEE ALSO</a></li>
	<li><a href="#copyright_and_license">COPYRIGHT AND LICENSE</a></li>
</ul>

doc/AuthorizationHeader.html.en  view on Meta::CPAN

<pre>
 
 see <a href="http://lemonldap.sf.net">http://lemonldap.sf.net</a> for more infos .</pre>
<p>
</p>
<h2><a name="overlay">Overlay</a></h2>
<p>If you want use your own header  method you must use PLUGINHEADER parameter like this :
  in httpd.conf : perlsetvar lemonldappluginheader MyModule</p>
<pre>
 Your module must accept  3 parameters : config (all the hash of config ) , dn and sting of role (profil) .</pre>
<pre>

 view all matches for this distribution


Lemonldap-NG-Common

 view release on metacpan or  search on metacpan

lib/Lemonldap/NG/Common/Conf/Backends/Overlay.pm  view on Meta::CPAN

    if ($@) {
        $Lemonldap::NG::Common::Conf::msg .= $@;
        return undef;
    }
    my $conf =
      &{"Lemonldap::NG::Common::Conf::Backends::$self->{overlayRealtype}::load"}
      (@_);
    my @errors;
    foreach my $file (@files) {
        if ( open my $f, '<', "$self->{overlayDirectory}/$file" ) {
            local $/ = undef;
            my $content = <$f>;
            close $f;
            if ( $file =~ $hashParameters ) {
                eval { $content = JSON::from_json($content) };

lib/Lemonldap/NG/Common/Conf/Backends/Overlay.pm  view on Meta::CPAN

    my @files = eval { overList($self) };

    my @errors;
    foreach my $file (@files) {
        my $data = delete $fields->{$file};
        if ( $self->{overlayWrite} ) {
            if ( open my $f, '>', "$self->{overlayDirectory}/$file" ) {
                print $f (
                    $file =~ $hashParameters ? JSON::to_json($data) : $data );
                close $f;
            }

lib/Lemonldap/NG/Common/Conf/Backends/Overlay.pm  view on Meta::CPAN

    }

    die join( "\n", @errors ) if $@;

    return &{
        "Lemonldap::NG::Common::Conf::Backends::$self->{overlayRealtype}::store"
    }( $self, $fields );
}

sub overList {
    my ($self) = @_;

    my $overDir = $self->{overlayDirectory} or die 'Missing overlayDirectory';
    die "$overDir directory doesn't exist" unless -d $overDir and -r $overDir;
    opendir my $dir, $overDir or die $!;
    my @files = grep /^[^\.]/, readdir $dir;
    closedir $dir;
    my @errors;

lib/Lemonldap/NG/Common/Conf/Backends/Overlay.pm  view on Meta::CPAN

    return @files;
}

sub AUTOLOAD {
    my ($self) = @_;
    die 'Missing overlayRealtype'
      unless $self->{overlayRealtype};
    eval
      "require Lemonldap::NG::Common::Conf::Backends::$self->{overlayRealtype}";
    die $@ if $@;
    $AUTOLOAD =~ s/::Overlay::/::$self->{overlayRealtype}::/;
    my @res = &{$AUTOLOAD}(@_);
    return wantarray ? (@res) : $res;
}

1;

 view all matches for this distribution


Lemonldap-NG-Manager

 view release on metacpan or  search on metacpan

site/htdocs/static/bwr/angular-bootstrap/ui-bootstrap-tpls.js  view on Meta::CPAN

     * Used by scrollbarWidth() function to cache scrollbar's width.
     * Do not access this variable directly, use scrollbarWidth() instead.
     */
    var SCROLLBAR_WIDTH;
    /**
     * scrollbar on body and html element in IE and Edge overlay
     * content and should be considered 0 width.
     */
    var BODY_SCROLLBAR_WIDTH;
    var OVERFLOW_REGEX = {
      normal: /(auto|scroll)/,

site/htdocs/static/bwr/angular-bootstrap/ui-bootstrap-tpls.js  view on Meta::CPAN

      },

      /**
       * Provides the scrollbar width, concept from TWBS measureScrollbar()
       * function in https://github.com/twbs/bootstrap/blob/master/js/modal.js
       * In IE and Edge, scollbar on body and html element overlay and should
       * return a width of 0.
       *
       * @returns {number} The width of the browser scollbar.
       */
      scrollbarWidth: function(isBody) {

 view all matches for this distribution


Lemonldap-NG-Portal

 view release on metacpan or  search on metacpan

site/htdocs/static/bwr/bootstrap/dist/css/bootstrap-grid.css.map  view on Meta::CPAN

{"version":3,"sources":["../../scss/bootstrap-grid.scss","bootstrap-grid.css","../../scss/_grid.scss","../../scss/mixins/_grid.scss","../../scss/mixins/_breakpoints.scss","../../scss/_variables.scss","../../scss/mixins/_grid-framework.scss","../../sc...

 view all matches for this distribution


Lemonldap-Portal-Standard

 view release on metacpan or  search on metacpan

examples/accueil.pl  view on Meta::CPAN

   	$session{uid}  = $entry->get_value('uid');
#   	$session{cn}   = $entry->get_value('cn');
#   	$session{personaltitle} = $entry->get_value('personaltitle');
#   	$session{mail}          = $entry->get_value('mail');
#   	$session{title}      = $entry->get_value('title');
## my overlay    
#   $session{departement}   = $entry->get_value('departement');
#   $session{codique}       = $entry->get_value('codique');
#   $session{boitier}       = "lemonintimpots";
#   $session{grade} = $entry->get_value('grade');
#   $session{fonction} = $entry->get_value('fonction');

 view all matches for this distribution


LibZip

 view release on metacpan or  search on metacpan

myldr/zlib-src/deflate.c  view on Meta::CPAN

{
    deflate_state *s;
    int noheader = 0;
    static const char* my_version = ZLIB_VERSION;

    ushf *overlay;
    /* We overlay pending_buf and d_buf+l_buf. This works since the average
     * output size for (length,distance) codes is <= 24 bits.
     */

    if (version == Z_NULL || version[0] != my_version[0] ||
        stream_size != sizeof(z_stream)) {

myldr/zlib-src/deflate.c  view on Meta::CPAN

    s->prev   = (Posf *)  ZALLOC(strm, s->w_size, sizeof(Pos));
    s->head   = (Posf *)  ZALLOC(strm, s->hash_size, sizeof(Pos));

    s->lit_bufsize = 1 << (memLevel + 6); /* 16K elements by default */

    overlay = (ushf *) ZALLOC(strm, s->lit_bufsize, sizeof(ush)+2);
    s->pending_buf = (uchf *) overlay;
    s->pending_buf_size = (ulg)s->lit_bufsize * (sizeof(ush)+2L);

    if (s->window == Z_NULL || s->prev == Z_NULL || s->head == Z_NULL ||
        s->pending_buf == Z_NULL) {
        strm->msg = (char*)ERR_MSG(Z_MEM_ERROR);
        deflateEnd (strm);
        return Z_MEM_ERROR;
    }
    s->d_buf = overlay + s->lit_bufsize/sizeof(ush);
    s->l_buf = s->pending_buf + (1+sizeof(ush))*s->lit_bufsize;

    s->level = level;
    s->strategy = strategy;
    s->method = (Byte)method;

myldr/zlib-src/deflate.c  view on Meta::CPAN

#ifdef MAXSEG_64K
    return Z_STREAM_ERROR;
#else
    deflate_state *ds;
    deflate_state *ss;
    ushf *overlay;


    if (source == Z_NULL || dest == Z_NULL || source->state == Z_NULL) {
        return Z_STREAM_ERROR;
    }

myldr/zlib-src/deflate.c  view on Meta::CPAN

    ds->strm = dest;

    ds->window = (Bytef *) ZALLOC(dest, ds->w_size, 2*sizeof(Byte));
    ds->prev   = (Posf *)  ZALLOC(dest, ds->w_size, sizeof(Pos));
    ds->head   = (Posf *)  ZALLOC(dest, ds->hash_size, sizeof(Pos));
    overlay = (ushf *) ZALLOC(dest, ds->lit_bufsize, sizeof(ush)+2);
    ds->pending_buf = (uchf *) overlay;

    if (ds->window == Z_NULL || ds->prev == Z_NULL || ds->head == Z_NULL ||
        ds->pending_buf == Z_NULL) {
        deflateEnd (dest);
        return Z_MEM_ERROR;

myldr/zlib-src/deflate.c  view on Meta::CPAN

    zmemcpy(ds->prev, ss->prev, ds->w_size * sizeof(Pos));
    zmemcpy(ds->head, ss->head, ds->hash_size * sizeof(Pos));
    zmemcpy(ds->pending_buf, ss->pending_buf, (uInt)ds->pending_buf_size);

    ds->pending_out = ds->pending_buf + (ss->pending_out - ss->pending_buf);
    ds->d_buf = overlay + ds->lit_bufsize/sizeof(ush);
    ds->l_buf = ds->pending_buf + (1+sizeof(ush))*ds->lit_bufsize;

    ds->l_desc.dyn_tree = ds->dyn_ltree;
    ds->d_desc.dyn_tree = ds->dyn_dtree;
    ds->bl_desc.dyn_tree = ds->bl_tree;

 view all matches for this distribution


Lingua-EN-Infinitive

 view release on metacpan or  search on metacpan

lib/Lingua/EN/Infinitive.pm  view on Meta::CPAN

		overhanged		=> 'overhang',
		overheard		=> 'overhear',
		overhung		=> 'overhang',
		overladed		=> 'overlade',
		overladen		=> 'overlade',
		overlaid		=> 'overlay',
		overlain		=> 'overlie',
		overlay			=> 'overlie',
		overleaped		=> 'overleap',
		overleapt		=> 'overleap',
		overpaid		=> 'overpay',
		overran			=> 'overrun',
		overridden		=> 'override',

 view all matches for this distribution


Lingua-EN-Opinion

 view release on metacpan or  search on metacpan

lib/Lingua/EN/Opinion/Emotion.pm  view on Meta::CPAN

        overhaul => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overhead => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overjoyed => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 1, negative => 0, positive => 1, sadness => 0, surprise => 0, trust => 0 },
        overlaid => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overlap => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overlay => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overload => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 1, positive => 0, sadness => 1, surprise => 0, trust => 0 },
        overlying => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overpaid => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 1, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overpass => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 0, positive => 0, sadness => 0, surprise => 0, trust => 0 },
        overpower => { anger => 0, anticipation => 0, disgust => 0, fear => 0, joy => 0, negative => 1, positive => 0, sadness => 0, surprise => 0, trust => 0 },

 view all matches for this distribution


Lingua-EN-SENNA

 view release on metacpan or  search on metacpan

lib/Lingua/EN/SENNA/third-party/senna/hash/words.lst  view on Meta::CPAN

overlander
overlap
overlapped
overlapping
overlaps
overlay
overlayed
overlaying
overlays
overlies
overliquid
overload
overloaded
overloading

 view all matches for this distribution


Lingua-EN-Segment

 view release on metacpan or  search on metacpan

share/count_1w.txt  view on Meta::CPAN

scaled	2786253
contingency	2784609
photon	2784392
wiltshire	2784041
vague	2783775
overlay	2783154
wraps	2781569
constituents	2780907
rusty	2780895
pharma	2779510
herd	2779216

share/count_1w.txt  view on Meta::CPAN

ond	759448
twenties	759419
tantra	759417
codified	759394
ncs	759387
overlays	759289
thingy	759227
monstrous	759187
comforters	759111
conservatories	759096
ruskin	759090

share/count_1w.txt  view on Meta::CPAN

frizzell	135570
subgrade	135568
phosphatases	135567
crr	135565
raph	135564
overlaying	135563
ontogeny	135562
elonex	135562
blustery	135560
courtier	135559
prescot	135552

share/count_1w.txt  view on Meta::CPAN

pmas	53017
explorative	53017
wehave	53016
trills	53015
surfcam	53015
overlayed	53015
spanne	53014
radioworks	53014
plamondon	53014
inputsource	53014
dihydrocodeine	53014

share/count_1w.txt  view on Meta::CPAN

fieser	21262
cisternae	21262
atuo	21262
ustoa	21261
partyline	21261
overlayer	21261
nji	21261
murra	21261
forder	21261
burgundians	21261
artisticness	21261

 view all matches for this distribution


Lingua-EN-Tagger

 view release on metacpan or  search on metacpan

Tagger/words.yml  view on Meta::CPAN

overheating: { vbg: 1 }
overinclusion: { nn: 1 }
overlaid: { vbn: 1 }
overlap: { vbp: 1, vb: 1 }
overlapping: { jj: 1, vbg: 1 }
overlay: { nn: 1 }
overlays: { vbz: 1 }
overleveraged: { jj: 1 }
overload: { nn: 2 }
overlook: { vbp: 2, vb: 1 }
overlooked: { vbn: 1, vbd: 1 }
overlooking: { vbg: 3 }

 view all matches for this distribution


Lingua-Stem

 view release on metacpan or  search on metacpan

examples/collected_works_poe.txt  view on Meta::CPAN

the _character _of the room. The carpet - of Saxony material - is quite
half an inch thick, and is of the same crimson ground, relieved simply by
the appearance of a gold cord (like that festooning the curtains) slightly
relieved above the surface of the _ground, _and thrown upon it in such a
manner as to form a succession of short irregular curves - one
occasionally overlaying the other. The walls are prepared with a glossy
paper of a silver gray tint, spotted with small Arabesque devices of a
fainter hue of the prevalent crimson. Many paintings relieve the expanse
of paper. These are chiefly landscapes of an imaginative cast-such as the
fairy grottoes of Stanfield, or the lake of the Dismal Swamp of Chapman.
There are, nevertheless, three or four female heads, of an ethereal

 view all matches for this distribution


Link_Controller

 view release on metacpan or  search on metacpan

TODO  view on Meta::CPAN

times larger than the CDB files and so unmanagable.

At the time I started writing this, none of the free SQL databases
could satisfy the needs of this project.  Now they've improved
considerably. It would be nice to have an implementation of the Link
class which was overlayed over SQL storage.

Some of the techniques used in this set of programs seem a little
brutal (e.g. the fixlink program doesn't really understand html and
just guesses where to make substitutions..).  Comparative testing
against other programs would be nice.

TODO  view on Meta::CPAN


It might be nice if people could keep personal information about links
in their own database.  For example, someone might have a link which
only exists for six months a year and want to record that it should
only be worried about at that time.  This would be kept in a DB file
as hashes which were then overlayed over the original Link, but
otherwise treated the same.

Possibly give extract-links a robot agent option in case someone wants
to use it for downloading from the www.  I'm not sure if this is
encouraging people to do things they shouldn't do or is something that

 view all matches for this distribution


Linux-Event-Fork

 view release on metacpan or  search on metacpan

t/05-child-setup-options.t  view on Meta::CPAN

use Test2::V0;

use Linux::Event;
use Linux::Event::Fork;

# Test cwd + env overlay + clear_env + umask.
# We run a small perl child that prints:
#   cwd=<...>
#   foo=<...>
#   path=<... or undef>
#   umask=<...>

t/05-child-setup-options.t  view on Meta::CPAN

  ok($exit && $exit->exited, 'child exited');
  is($exit->code, 0, 'exit code 0');
  return $out;
}

# 1) env overlay should preserve PATH by default.
{
  my $out = run_child(
    cmd => [
      $^X, '-we',
      q{

t/05-child-setup-options.t  view on Meta::CPAN

      },
    ],
    env => { FOO => "BAR" },
  );

  like($out, qr/^foo=BAR$/m, 'FOO overlay applied');
  like($out, qr/^path=1$/m, 'PATH preserved (overlay)');
}

# 2) clear_env should remove PATH unless explicitly set.
{
  my $out = run_child(

 view all matches for this distribution


List-Gen

 view release on metacpan or  search on metacpan

lib/List/Gen.pm  view on Meta::CPAN

        :utility    mapn by every apply min max reduce mapab
                    mapkey d deref slide curse remove

        :source     range glob makegen list array vecgen repeat file

        :modify     gen cache expand contract collect slice flip overlay
                    test recursive sequence scan scan_stream == scanS
                    cartesian transpose stream strict

        :zip        zip zipgen tuples zipwith zipwithab unzip unzipn
                    zipmax zipgenmax zipwithmax

lib/List/Gen.pm  view on Meta::CPAN

        :utility    mapn by every apply min max reduce mapab
                    mapkey d deref slide curse remove

        :source     range glob makegen list array vecgen repeat file

        :modify     gen cache expand contract collect slice flip overlay
                    test recursive sequence scan scan_stream == scanS
                    cartesian transpose stream strict

        :zip        zip zipgen tuples zipwith zipwithab unzip unzipn
                    zipmax zipgenmax zipwithmax

lib/List/Gen.pm  view on Meta::CPAN


=item * B<functions as methods>:

most of the functions in this package are also methods of generators, including
by, every, mapn, gen, map (alias of gen), filter, grep (alias of filter), test,
cache, flip, reverse (alias of flip), expand, collect, overlay, mutable, while,
until, recursive, rec (alias of recursive).

    my $gen = (range 0, 1_000_000)->gen(sub{$_**2})->filter(sub{$_ % 2});
    #same as: filter {$_ % 2} gen {$_**2} 0, 1_000_000;

lib/List/Gen.pm  view on Meta::CPAN

                else {Carp::croak "no method '$method' on '".ref($self)."'"}
            }
        }
    }
    sub reverse {goto &List::Gen::flip}
    sub overlay {goto &List::Gen::overlay}
    sub zipmax  {goto &List::Gen::zipgenmax}
    sub zipwithmax {
        my $code = splice @_, 1, 1;
        $code->$sv2cv;
        unshift @_, $code;

lib/List/Gen.pm  view on Meta::CPAN

        &scan
    }
    BEGIN {*scanS = *scan_stream}


=item overlay C< GENERATOR PAIRS >

overlay allows you to replace the values of specific generator cells.  to set
the values, either pass the overlay constructor a list of pairs in the form
C<< index => value, ... >>, or assign values to the returned generator using
normal array ref syntax

    my $fib; $fib = overlay gen {$$fib[$_ - 1] + $$fib[$_ - 2]};
    @$fib[0, 1] = (0, 1);

    # or
    my $fib; $fib = gen {$$fib[$_ - 1] + $$fib[$_ - 2]}
                  ->overlay( 0 => 0, 1 => 1 );

    print "@$fib[0 .. 15]";  # '0 1 1 2 3 5 8 13 21 34 55 89 144 233 377 610'

=cut

    sub overlay ($%) {
        isagen (my $source = shift)
            or croak '$_[0] to overlay must be a generator';
        tiegen Overlay => tied @$source, @_
    }
    generator Overlay => sub {
        my ($class, $source, %overlay) = @_;
        my ($fetch, $fsize) = $source->closures;
        curse {
            FETCH  => sub {
                exists $overlay{$_[1]}
                     ? $overlay{$_[1]}
                     : $fetch->(undef, $_[1])
            },
            STORE  => sub {$overlay{$_[1]} = $_[2]},
            fsize  => $fsize,
            source => sub {$source}
        } => $class
    };

lib/List/Gen.pm  view on Meta::CPAN

indices from the generator.  when called with a generator, it returns a lazy
slice from the source generator.  since the subroutine created by C< recursive >
is installed at runtime, you must call the subroutine with parenthesis.

    my $fib = gen {self($_ - 1) + self($_ - 2)}
            ->overlay( 0 => 0, 1 => 1 )
            ->cache
            ->recursive;

    print "@$fib[0 .. 15]";  # '0 1 1 2 3 5 8 13 21 34 55 89 144 233 377 610'

 view all matches for this distribution


LocalOverride

 view release on metacpan or  search on metacpan

lib/LocalOverride.pm  view on Meta::CPAN


    # We only want to check overrides in $base_namespace
    return unless $filename =~ /^$base_namespace/;

    # OK, that all passed, so we can load up the actual files
    # Get the original version first, then overlay the local version
    require $filename;

    my $local_file = $filename;
    if ($base_namespace) {
        $local_file =~ s[^$base_namespace][${base_namespace}/$local_prefix];

 view all matches for this distribution


Locale-XGettext

 view release on metacpan or  search on metacpan

lib/Locale/XGettext/Util/POEntries.pm  view on Meta::CPAN

    @{shift->{__entries}};
}

# This is a simplified merge for merging entries without any translations.
sub __mergeEntries {
    my ($self, $entry, $overlay) = @_;

    if (defined $entry->msgid_plural 
        && defined $overlay->msgid_plural
        && $entry->msgid_plural ne $overlay->msgid_plural) {
        # This is a fatal error as GNU gettext cannot grok with
        # this case.
        # See https://savannah.gnu.org/bugs/index.php?48411
        $self->__conflict($entry, $overlay,
                          __"conflicting plural forms");
    }

    # If one of the two entries currently has no plural form, there is no
    # problem.
    $entry->msgid_plural($overlay->dequote($overlay->msgid_plural)) 
        if defined $overlay->msgid_plural;

    my $new_ref = $overlay->reference;
    my $reference = $entry->reference;
    my @lines = split "\n", $reference;
    if (!@lines) {
        push @lines, $new_ref;
    } else {

lib/Locale/XGettext/Util/POEntries.pm  view on Meta::CPAN

        }
    }

    $entry->reference(join "\n", @lines);

    $entry->fuzzy($overlay->fuzzy) if $overlay->fuzzy;
    if (defined $entry->comment) {
        $entry->comment(join "\n", $entry->comment, $overlay->comment);
    } else {
        $entry->comment($overlay->comment) if defined $overlay->comment;
    }
    if (defined $entry->automatic) {
        $entry->automatic(join "\n", $entry->automatic, $overlay->automatic);
    } else {
        $entry->automatic($overlay->automatic) if defined $overlay->automatic;
    }

    # Locale::PO does not allow to iterate over the flags.  We have to
    # use the private property directly.
    my @flags = @{$overlay->{_flags} || []};
    foreach my $flag (@flags) {
        if ($flag =~ /^no-(.*)/) {
           $self->__conflict($entry, $overlay,
                             __x"conflicting flags")
               if $entry->has_flag($1);
        } elsif ($entry->has_flag("no-$flag")) {
           $self->__conflict($entry, $overlay,
                             __x"conflicting flags");
        }
        $entry->add_flag($flag) if !$entry->has_flag($flag);
    }

 view all matches for this distribution


Log-Log4perl-AutoCategorize

 view release on metacpan or  search on metacpan

lib/Log/Log4perl/AutoCategorize.pm  view on Meta::CPAN

The default config writes to stdout, and includes a test-coverage
setup.  This config is used at import() time, unless a or b is
provided by you.  If you explicitly call init(), the base is
re-initialized, and relys on base behavior to work correctly.

I hope at some point to provide init_modify(), which will overlay new
configuration on existing, rather than a full reinitialization.  This
will be implemented using Log4perls (currently nonexistent)
configuration include mechanism.

=head2 Automatic Dump of structured data

 view all matches for this distribution


MIME-DB

 view release on metacpan or  search on metacpan

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

$VERSION = 'v1.52.0';
# generation date: 2023-01-31T03:41:54Z
# command: tools\generate.pl
# source url: https://cdn.jsdelivr.net/gh/jshttp/mime-db@v1.52.0/db.json
use constant version => 'v1.52.0';
sub data { {'application/mud+json',{source=>'iana',compressible=>1},'application/vnd.commonspace',{extensions=>['csp'],source=>'iana'},'text/x-handlebars-template',{extensions=>['hbs']},'application/vnd.dbf',{source=>'iana',extensions=>['dbf']},'appl...
1

 view all matches for this distribution


MIME-Types

 view release on metacpan or  search on metacpan

lib/MIME/types.db  view on Meta::CPAN

oti;application/vnd.oasis.opendocument.image-template
otm;application/vnd.oasis.opendocument.text-master-template
otp;application/vnd.oasis.opendocument.presentation-template
ots;application/vnd.oasis.opendocument.spreadsheet-template
ott;application/vnd.oasis.opendocument.text-template
ovl;application/vnd.afpc.modca-overlay
owl;application/vnd.biopax.rdf+xml
owx;application/x-owl+xml
oxlicg;application/vnd.oxli.countgraph
oxps;application/oxps
oxt;application/vnd.openofficeorg.extension

lib/MIME/types.db  view on Meta::CPAN

rdf;application/rdf+xml
rdfs;application/rdf+xml
rdz;application/vnd.data-vision.rdz
reg;text/x-ms-regedit
rej;text/x-reject
relo;application/p2p-overlay+xml
reload;application/vnd.resilient.logic
rep;application/vnd.businessobjects
req;application/vnd.nervana
request;application/vnd.nervana
res;application/x-dtbresource+xml

lib/MIME/types.db  view on Meta::CPAN

oebps-package+xml;opf;;
ogg;ogx;;
oxps;oxps,xps;;
p21+zip;stpz;;
p21;p21,stp,step,stpnc,210,ifc;;
p2p-overlay+xml;relo;;
patch-ops-error+xml;xer;;
pdf;pdf;base64;
pdx;pdx;;
pem-certificate-chain;pem;;
pgp-encrypted;pgp,gpg,asc;7bit;

lib/MIME/types.db  view on Meta::CPAN

vnd.adobe.flash.movie;swf,spl;;
vnd.adobe.formscentral.fcdt;fcdt;;
vnd.adobe.fxp;fxp,fxpl;;
vnd.adobe.xdp+xml;xdp;;
vnd.adobe.xfdf;xfdf;;
vnd.afpc.modca-overlay;ovl;;
vnd.afpc.modca-pagesegment;psg;;
vnd.afpc.modca;list3820,listafp,afp,pseg3820;;
vnd.age;age;;
vnd.ahead.space;ahead;;
vnd.airzip.filesecure.azf;azf;;

 view all matches for this distribution


Mail-BIMI

 view release on metacpan or  search on metacpan

lib/Mail/BIMI/Data/Tiny-1.2.rng  view on Meta::CPAN

              <value type="token" datatypeLibrary="" ns="">pinned270</value>
            </choice>
          </attribute>
        </optional>
        <optional>
          <attribute name="overlay" ns="">
            <choice>
              <value type="token" datatypeLibrary="" ns="">none</value>
              <value type="token" datatypeLibrary="" ns="">top</value>
            </choice>
          </attribute>

 view all matches for this distribution


Mail-Box

 view release on metacpan or  search on metacpan

t/folders/mbox.cpy  view on Meta::CPAN


1)  Take a JPEG image and size it down to a particular size.
2)  Overlay that JPEG on top of an GIF image to form a combined result.

This works fine for the most part:  I use mogrify to resize, followed by 
combine to overlay.

Now I'm presented with GIF images (the ones the JPEG is put on top of)
that have colors or other background attributes we want to 'show through'
the overlay where there is no image.

Even without any transparency options this seems to ALMOST work.  The
problem is that there's a small area around each image of 'white' that
always
shows up.  Trying transparency or the 'matte' option of '-draw' seems to

t/folders/mbox.cpy  view on Meta::CPAN

> 
> 1)  Take a JPEG image and size it down to a particular size.
> 2)  Overlay that JPEG on top of an GIF image to form a combined result.
> 
> This works fine for the most part:  I use mogrify to resize, followed by 
> combine to overlay.
> 
> Now I'm presented with GIF images (the ones the JPEG is put on top of)
> that have colors or other background attributes we want to 'show through'
> the overlay where there is no image.
> 
> Even without any transparency options this seems to ALMOST work.  The
> problem is that there's a small area around each image of 'white' that
> always
> shows up.  Trying transparency or the 'matte' option of '-draw' seems to

t/folders/mbox.cpy  view on Meta::CPAN

> > 1)  Take a JPEG image and size it down to a particular size.
> > 2)  Overlay that JPEG on top of an GIF image to form a combined result.
> > 
> > This works fine for the most part:  I use mogrify to resize, followed by
> 
> > combine to overlay.
> > 
> > Now I'm presented with GIF images (the ones the JPEG is put on top of)
> > that have colors or other background attributes we want to 'show
> through'
> > the overlay where there is no image.
> > 
> > Even without any transparency options this seems to ALMOST work.  The
> > problem is that there's a small area around each image of 'white' that
> > always
> > shows up.  Trying transparency or the 'matte' option of '-draw' seems to

t/folders/mbox.cpy  view on Meta::CPAN

> > > > 
> > > > This works fine for the most part:  I use mogrify to resize,
> followed
> > by
> > > 
> > > > combine to overlay.
> > > > 
> > > > Now I'm presented with GIF images (the ones the JPEG is put on top
> of)
> > > > that have colors or other background attributes we want to 'show
> > > through'
> > > > the overlay where there is no image.
> > > > 
> > > > Even without any transparency options this seems to ALMOST work.
> The
> > > > problem is that there's a small area around each image of 'white'
> that

t/folders/mbox.cpy  view on Meta::CPAN

> > > > > 
> > > > > This works fine for the most part:  I use mogrify to resize,
> > followed
> > > by
> > > > 
> > > > > combine to overlay.
> > > > > 
> > > > > Now I'm presented with GIF images (the ones the JPEG is put on top
> > of)
> > > > > that have colors or other background attributes we want to 'show
> > > > through'
> > > > > the overlay where there is no image.
> > > > > 
> > > > > Even without any transparency options this seems to ALMOST work.
> > The
> > > > > problem is that there's a small area around each image of 'white'
> > that

 view all matches for this distribution


Mail-Colander

 view release on metacpan or  search on metacpan

lib/Mail/Colander/Server.pm  view on Meta::CPAN


sub _argslist ($in) {
   ref($in) eq 'ARRAY' ? $in->@* : defined($in) ? $in->%* : ()
}

sub _sieve_call ($sieve, $command, $overlay) {
   my $outcome = try {
      my ($out, $data, $call_sequence)
         = $sieve->policy_for($command, $overlay);

      if ($log->is_debug && $call_sequence && $call_sequence->@*) {
         my $calls = join "\n", map { '  ' . $_->{chain} } $call_sequence->@*;
         $log->debug(
            join ' ', 

lib/Mail/Colander/Server.pm  view on Meta::CPAN

   my $sh = $stream->handle;
   my $session = Mail::Colander::Session->new(
      peer_ip   => $sh->peerhost,
      peer_port => $sh->peerport,
   );
   my $overlay = Data::Annotation::Overlay->new(
      under => $session,
      cache_existing => 0,
   );

   # first of all collect the peer IP address and figure out whether
   # it's worth bothering or not
   my $outcome = _sieve_call($sieve, connect => $overlay);
   if ($outcome) {
      $args{callback_for}{connect}->($session)
         if $args{callback_for}{connect};
   }
   else {

lib/Mail/Colander/Server.pm  view on Meta::CPAN

         $command,
         sub {
            return unless eval { $session->$method(@_) };   # accumulate

            # call the $sieve if so instructed
            my $outcome = _sieve_call($sieve, $command, $overlay);
            if (! $outcome) {
               $args{callback_for}{reject}->($command, $session)
                  if $args{callback_for}{reject};
               $session->reset;
               return;

 view all matches for this distribution


Mail-Make

 view release on metacpan or  search on metacpan

lib/MM/Table.pm  view on Meta::CPAN

        }
    }
    return( $self );
}

sub overlay
{
    my( $self, $other ) = @_;

    $self->_validate_table( $other ) || return( $self->pass_error );

lib/MM/Table.pm  view on Meta::CPAN


    $t->merge( foo => "three" );   # first "foo" becomes "one, three"

    my $copy = $t->copy;

    my $o = $t->overlay( $copy );

    $t->compress( OVERLAP_TABLES_SET );    # flattens to last value per key
    $t->compress( OVERLAP_TABLES_MERGE );  # flattens to "a, b, c"

    $t->do( sub{ print "$_[0] => $_[1]\n"; 1 } ) || die( $t->error );

lib/MM/Table.pm  view on Meta::CPAN


=head2 overlap( $other_table, $flags )

Copies all entries from C<$other_table> into C<$self>. With C<OVERLAP_TABLES_SET> each key is replaced; with C<OVERLAP_TABLES_MERGE> values are appended. Returns C<$self>, or C<undef> on error.

=head2 overlay( $other_table )

Returns a new C<MM::Table> containing all entries from C<$other_table> followed by all entries from C<$self> (C<$other_table> entries come first).
Returns the new table, or C<undef> on error.

=head2 pass_error

 view all matches for this distribution


Maplat

 view release on metacpan or  search on metacpan

lib/Maplat/Web/Static/jquery/css/blackvelvet/jquery-ui-1.8.6.custom.css  view on Meta::CPAN


/* Misc visuals
----------------------------------*/

/* Overlays */
.ui-widget-overlay { position: absolute; top: 0; left: 0; width: 100%; height: 100%; }


/*
 * jQuery UI CSS Framework 1.8.6
 *

lib/Maplat/Web/Static/jquery/css/blackvelvet/jquery-ui-1.8.6.custom.css  view on Meta::CPAN

.ui-corner-right {  -moz-border-radius-topright: 10px; -webkit-border-top-right-radius: 10px; border-top-right-radius: 10px; -moz-border-radius-bottomright: 10px; -webkit-border-bottom-right-radius: 10px; border-bottom-right-radius: 10px; }
.ui-corner-left { -moz-border-radius-topleft: 10px; -webkit-border-top-left-radius: 10px; border-top-left-radius: 10px; -moz-border-radius-bottomleft: 10px; -webkit-border-bottom-left-radius: 10px; border-bottom-left-radius: 10px; }
.ui-corner-all { -moz-border-radius: 10px; -webkit-border-radius: 10px; border-radius: 10px; }

/* Overlays */
.ui-widget-overlay { background: #262626 url(images/ui-bg_diagonals-small_50_262626_40x40.png) 50% 50% repeat; opacity: .30;filter:Alpha(Opacity=30); }
.ui-widget-shadow { margin: -6px 0 0 -6px; padding: 6px; background: #303030 url(images/ui-bg_flat_0_303030_40x100.png) 50% 50% repeat-x; opacity: .50;filter:Alpha(Opacity=50); -moz-border-radius: 12px; -webkit-border-radius: 12px; border-radius: 12p...
 * jQuery UI Resizable 1.8.6
 *
 * Copyright 2010, AUTHORS.txt (http://jqueryui.com/about)
 * Dual licensed under the MIT or GPL Version 2 licenses.

 view all matches for this distribution


MarpaX-Hoonlint

 view release on metacpan or  search on metacpan

hoons/arvo/lib/hood/drum.hoon  view on Meta::CPAN

      mir/(pair @ud stub:dill)                         ::  mirrored terminal
  ==                                                    ::
++  history                                             ::  past input
  $:  pos/@ud                                           ::  input position
      num/@ud                                           ::  number of entries
      lay/(map @ud (list @c))                           ::  editing overlay
      old/(list (list @c))                              ::  entries proper
  ==                                                    ::
++  search                                              ::  reverse-i-search
  $:  pos/@ud                                           ::  search position
      str/(list @c)                                     ::  search string

 view all matches for this distribution


( run in 2.484 seconds using v1.01-cache-2.11-cpan-7fcb06a456a )