Skip to content

Instantly share code, notes, and snippets.

Breno G. de Oliveira garu

Block or report user

Report or block garu

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@philfreo
philfreo / gist:7257723
Created Oct 31, 2013
Facebook Perl source code from 2005. When browsing around thefacebook.com in 2005 the server spit out some server-side source code rather than running it. I believe this was for their old graph feature that let you visualize the graph between all your friends. The filename is `mygraph.svgz` and contains some gems such as a commented out "zuck" d…
View gist:7257723
#!/usr/bin/perl
use Mysql;
use strict;
use vars qw($school_name);
use vars qw($pass);
require "./cgi-lib.pl";
View cpanfile
requires 'CHI';
requires 'DDP';
requires 'MetaCPAN::Client';
requires 'Modern::Perl';
requires 'Try::Tiny';
You can’t perform that action at this time.