Skip to content

Instantly share code, notes, and snippets.

View jberger's full-sized avatar

Joel Berger jberger

View GitHub Profile
@jberger
jberger / gist:1022879
Created June 13, 2011 14:38
Code pretty printer using Regexp::Grammars
#!/usr/bin/env perl
use strict;
use warnings;
use Data::Dumper;
use Regexp::Grammars;
my $grammar = qr{
<nocontext:>
<Line>
@jberger
jberger / gist:1024315
Created June 14, 2011 04:22
Continuity based browser "deep ls"
#!/usr/bin/env perl
use strict;
use warnings;
use Continuity;
use File::chdir;
my $server = Continuity->new(port => 8080);
$server->loop;
@jberger
jberger / boat-parts.txt
Created August 10, 2011 18:01
Boat reconstruction
Urethane Foam
http://www.aeromarineproducts.com/boat-foam.htm
http://www.uscomposites.com/foam.html
Scupper valves
http://www.bellrpg.net/soderbloom/MA/grouppart.asp?MAJ=020&PRI=086&SEC=191&GRP=1232
@jberger
jberger / latex_columns.tex
Created September 13, 2011 16:30
LaTeX field of columns on chip
\documentclass{article}
\usepackage{tikz}
\usepackage{pgffor}
\begin{document}
\begin{tikzpicture}
\draw [fill=gray!30]
(0,0)
coordinate (front top left)
@jberger
jberger / regex.pl
Created November 9, 2011 04:22
Perl Regex for Phil
#!/usr/bin/env perl
use Data::Dumper;
my $text = <<'END';
John has Acquired Immunodeficiency Synodrom (AIDS), while Steve has Human Immunodeficiency Synodrom (HIV).
END
my @split = $text =~ /
( #capture (full name of disease)
@jberger
jberger / readme_dist.ini
Created December 1, 2011 20:27
ReadmeAnyFromPOD
[ReadmeAnyFromPod / pod.root ]
filename = README.pod
type = pod
location = root
@jberger
jberger / usex-declare.pm
Created December 31, 2011 07:19
A basic use_from implementation
package UseX::Declare;
use strict;
use warnings;
use Carp;
use Devel::Declare ();
my $verbose = 0;
@jberger
jberger / metacpan.pl
Created January 5, 2012 15:41
metacpan animated header
use Mojolicious::Lite;
# requires jCanvaScript: http://jcscript.com/
get '/' => 'index';
app->start;
__DATA__
@@ index.html.ep
@jberger
jberger / FTP-Build.PL
Created January 15, 2012 18:45
Alien::Base with alternative FTP object
use strict;
use warnings;
use Alien::Base::ModuleBuild;
my $ftp = FTP::Other->new( host => 'my.host.org', folder => '/folder' );
$ftp->binary();
my $builder = Alien::Base::ModuleBuild->new(
module_name => 'Alien::GSL',
@jberger
jberger / a-b_proposal.pod
Created January 15, 2012 19:29
Alien::Base tpf grant proposal

Alien::Base - Base classes for Alien:: modules

Name:

Joel Berger

Email:

POD ERRORS

Hey! The above document had some coding errors, which are explained below:

Around line 4:

=over without closing =back