Skip to content

Instantly share code, notes, and snippets.

View ironcamel's full-sized avatar

Naveed Massjouni ironcamel

89 followers · 106 following
  • Blacksburg, VA, USA
View GitHub Profile
@ironcamel
ironcamel / SimpleRequest.java
Created October 27, 2010 04:14
This is a comparison of making a simple http request with basic/digest authentication in perl and java. I was porting a perl app to the android platform (java) and was struck by the different amount of complexity and effort required.
import java.io.BufferedReader;
import java.io.InputStreamReader;
import org.apache.http.auth.AuthScope;
import org.apache.http.auth.UsernamePasswordCredentials;
import org.apache.http.impl.client.BasicCredentialsProvider;
import org.apache.http.impl.client.DefaultHttpClient;
import org.apache.http.client.methods.HttpGet;
import org.apache.http.HttpRequest;
import org.apache.http.HttpResponse;
public class SimpleRequest {
@ironcamel
ironcamel / simple-request.pl
Created October 27, 2010 04:15
use LWP::UserAgent;
my $agent = LWP::UserAgent->new();
$agent->credentials($host, $realm, $user, $pass);
print $agent->get($uri)->content();
@ironcamel
ironcamel / index.tt
Created December 20, 2010 09:01
A simple websocket web app using the Dancer web framework http://perldancer.org
<html>
<head>
<script src="http://ajax.googleapis.com/ajax/libs/jquery/1.4.2/jquery.min.js"></script>
<script>
var socket;
$(function() {
// ws_path should be of the form ws://host/_hippie/ws
var ws_path = "ws:<% request.base.opaque %>_hippie/ws";
@ironcamel
ironcamel / ruby-is-poorly-scoped.rb
Created January 16, 2011 12:49 — forked from tildedave/ruby-1.8.7-is-poorly-scoped.rb
x = 0
[1,2,3].each{|x| puts x}
puts x
@ironcamel
ironcamel / freenode.yml
Created March 29, 2011 22:14
IRC bot that notifies via libnotify popups and festival text-to-speech converter
conn_info:
server: irc.freenode.net
port: 6667
channels:
- '#foo'
- '#bar'
nick: foobot
username: foobot
name: defender of the universe
ignore_list:
@ironcamel
ironcamel / treewidth.h
Created May 16, 2011 17:37
treewidth
/*
Treewidth is a class that reduces a graph by a series of "safe" rules.
It also generates a minimum value for the treewidth of the graph.
The rules that have been implemented so far are:
* Islet Rule
* Twig Rule
* Series Rule
* Triangle Rule
* Simplicial Rule
* Almost Simplicial Rule
@ironcamel
ironcamel / JSON-Schema.diff
Created September 10, 2011 23:22
JSON::Schema bugfix patch
235c235
< checkProp($value, $type, $path, undef, $_changing);
---
> $self->checkProp($value, $type, $path, undef, $_changing);
283c283
< checkProp($value, $schema->{'extends'}, $path, $i, $_changing);
---
> $self->checkProp($value, $schema->{'extends'}, $path, $i, $_changing);
304,306c304,307
< if (ref $schema->{'items'} eq 'ARRAY')
@ironcamel
ironcamel / script-runner.vim
Created September 15, 2011 04:47
vim script runner
nmap <F5> :call Run('perl')<CR>
cabbrev pyx call Run('python')
cabbrev perlx call Run('perl')
cabbrev rubyx call Run('ruby')
fu! NewThrowawayBuffer()
new
setlocal noswapfile
setlocal buftype=nowrite
setlocal bufhidden=delete
@ironcamel
ironcamel / p
Created September 25, 2011 02:12 — forked from mfontani/raptor.sh
steroids for your perl one-liners.
#!/usr/bin/env perl
# Based on Randy Stauner's http://blogs.perl.org/users/randy_stauner/2011/06/exploratory-one-liners-with-less-typing.html
# and Marco Fontani's https://gist.github.com/1042504.
# To install all dependencies:
# sudo cpanm File::Slurp JSON::XS Data::Dump YAML::XS utf8::all Class::Autouse
# Installation:
# copy this file to ~/bin/p
# Example usage:
# p 'dd [File::Spec->path]' # dynamically load arbitrary modules
# p -pe 's/foo/bar/' foo.txt # use your favorite options like -lane
@ironcamel
ironcamel / recursive-closure.pl
Created March 25, 2012 18:43
Recursive closure
my $factorial = sub {
my $val = shift;
return $val * __SUB__->($val - 1) if $val > 1;
return $val;
};
print $factorial->(5);