Skip to content

Instantly share code, notes, and snippets.

View chizmw's full-sized avatar

Chisel Malik-Wright chizmw

View GitHub Profile
@chizmw
chizmw / cmd_availability.pl
Created July 24, 2012 11:06
irssi 'availability' plugin script
#!/usr/bin/env perl
# Usage: /AVAILABILITY [here|lunch|meeting]
sub cmd_availability {
# data - contains the parameters for /HELLO
# server - the active server in window
# witem - the active window item (eg. channel, query)
# or undef if the window is empty
my ($data, $server, $witem) = @_;
@chizmw
chizmw / cmd_availability.pl
Created September 21, 2011 09:32
irssi plugin to munge nick and away message, preserving base nick
#!/usr/bin/env perl
# Usage: /AVAILABILITY [here|lunch|meeting]
sub cmd_availability {
# data - contains the parameters for /HELLO
# server - the active server in window
# witem - the active window item (eg. channel, query)
# or undef if the window is empty
my ($data, $server, $witem) = @_;
@chizmw
chizmw / test_err.t
Created September 17, 2011 20:41
test_err() experimentation
use Test::More;
use strict;
use warnings;
use Test::Builder::Tester;
test_out("not ok 1 - foo");
test_fail(+1);
fail("foo");
test_test("fail works");