dolmen

use strict;
use warnings;

package PodPOMWeb;
use Pod::POM::Web;

sub import
{
    my @caller = caller;
    if ("$caller[0]/$caller[1]" eq 'main/-e') {

dolmen

use strict;
use warnings;

package Shell::AutoLoad;
use Carp;

sub import 
{
    my $pkg = caller;

dolmen

// My Git worflow, when patching external projects
// Copyright (C) 2011 Olivier Mengué. All rights reserved.

// dot -Tpng -o git-patching-workflow.png git-patching-workflow.dot

digraph {

find_repo [ label="Find an interesting project on GitHub (or another Git repository)"];
use [ label="Use, test..." ];
bug_idea [ label="Find a bug or idea for a feature" ];

dolmen

# vim:set ft=perl:
use strict;
use warnings;

# plackup --port 8079 -s Twiggy -a GoogleBingProxy.psgi
# http_proxy=http://0.0.0.0:8079/ curl -i http://www.google.fr/


# Les lignes suivantes ne sont pas néccessaires, mais ça permet de
# spécifier plus clairement les dépendances pour ceux qui voudraient faire

dolmen

sub concat ($$)
{
    my ($i, $j) = @_;
    my $g;
    $g = sub {
        my ($i, @v) = $i->();
        if (defined $i) {
           ($g, @v);
        } else {
           ($j, @v);

dolmen

perl -MErrno -E "say join qq<\n>, sort grep /^E[A-Z]+$/, @Errno::EXPORT_OK" | more

dolmen

sub takeWhile (&$) {
    my ( $cond, $l ) = @_;
    my $m;
    $m = sub {
        1 < ( ( $l, my @v ) = $l->() ) or return ($l);
        return $cond->() ? ( $m, @v ) : ( sub { ( $l, @v ) } ) for @v;
    };
}

dolmen

use 5.010;
use strict;
use warnings;


sub ctx1
{
    return (3);
}

dolmen

#!/usr/bin/perl

# AnyEvent version of https://gist.github.com/1094658

use 5.010;
use strict;
use warnings;

use AnyEvent;
use AnyEvent::HTTP;

dolmen

Running make for A/AS/ASKSH/Snowball-Norwegian-1.2.tar.gz
Prepending /home/dolmen/.local/share/.cpan/build/Test-Compile-0.13-9VVA_G/blib/arch /home/dolmen/.local/share/.cpan/build/Test-Compile-0.13-9VVA_G/blib/lib to PERL5LIB for 'get'
Fetching with LWP:
http://distrib-coffee.ipsl.jussieu.fr/pub/mirrors/cpan/authors/id/A/AS/ASKSH/Snowball-Norwegian-1.2.tar.gz
Checksum for /home/dolmen/.local/share/.cpan/sources/authors/id/A/AS/ASKSH/Snowball-Norwegian-1.2.tar.gz ok
Snowball-Norwegian-1.2/
Snowball-Norwegian-1.2/bin/
Snowball-Norwegian-1.2/bin/.exists
Snowball-Norwegian-1.2/bin/stemmer-no.pl
Snowball-Norwegian-1.2/Build.PL