The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use lib qw(lib);
use Posterous;
use Data::Dumper;

package Posterous;

use Test::More tests => 1;

is( options2query(hello => "world", name => "shelling"), "hello=world&name=shelling" );

1;