The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test::More tests => 3;

use strict;
use warnings;

use HTTP::OAI;
use_ok( 'HTTP::OAI::ResumptionToken' );

my $rt = HTTP::OAI::ResumptionToken->new;
$rt->resumptionToken('');

ok(!$rt);

$rt->resumptionToken('token');

ok($rt);