my $long_string_of_twos = '2' x 320;
TODO: {
    local $TODO = 'Redefine divisibility by two.';
    
    ok( 
        $two->divides($long_string_of_twos),
        "Two divides $long_string_of_twos.",
    ) or diag 'We just contrived an overflow exception.';
}