tobyink

use v5.10;
use strict;
use warnings;

BEGIN {
	package Macro::Simple;
	use Carp;
	use Parse::Keyword {};
	
	sub import

maddingue

sub coerce_types {
    my $struct = shift;

    my $ref = ref $struct;
    croak "can only work with references" unless $ref;

    if ($ref eq "ARRAY") {
        for my $i (0..$#{$struct}) {
            next unless defined $struct->[$i];

kentfredric

#!/usr/bin/env perl
# FILENAME: unfatten.pl
# CREATED: 01/24/15 04:55:06 by Kent Fredric (kentnl) <kentfredric@gmail.com>
# ABSTRACT: Attempt to extract files from a codes fatpacked library.

use strict;
use 5.010001;
use warnings;

{

kentfredric

#!/usr/bin/env perl 
use strict;
use warnings;

sub dep(@) { Dep->new( name => @_ ) }

## Archive::Tar ------
dep 'GSAR/Archive-Tar-0.071.tar.gz' => provides => { 'Archive::Tar' => '0.071', };
dep 'SRZ/Archive-Tar-0.22.tar.gz'   => provides => { 'Archive::Tar' => '0.22', };

rjbs

# if ($obj->can('foo')) { ... }

# if ($obj->can('foo', $api_version)) { ... }

# if ($obj->can('foo', $api_version, $minor_version)) { ... }

use strict;
use Number::Nary qw(n_codec);

my $major = 10;

xenoterracide

load_plugin qw(
    Completion
    CompletionDriver::INC
    CompletionDriver::LexEnv
    CompletionDriver::Keywords
    CompletionDriver::Methods
    ReadLineHistory
);

dolmen

@mode con cp select=65001

eiro

#! /usr/bin/perl
use Modern::Perl;
use YAML;
# Net::Grammars::Digzone;
# possible bugs: no empty line available

# http://en.wikipedia.org/wiki/List_of_DNS_record_types
my $parse_dig_zone = do {
    use Regexp::Grammars;
    qr{ 

a2800276

##Using libuv and http-parser to build a webserver Ryan Dahl, @ryah
Talk as a screencast: http://vimeo.com/24713213
Source, Part I: http://t.co/utoIM93
Source, Part II: http://bit.ly/iBgnIA

##Node.js on windows Bert Belder
http://2bs.nl/nodecamp.pdf

bzerangue

<?xml version="1.0" encoding="UTF-8" ?>
<!--
	Twitter Button: XSL Utility
	Created by Zerangue, Brian on 2011-08-31.
	Copyright (c) 2011 Brian Zerangue. All rights reserved.
-->

<xsl:stylesheet version="1.0"
                xmlns:xsl="http://www.w3.org/1999/XSL/Transform">