zeroclickinfo-goodies/t/Base.t

100 lines
2.6 KiB
Perl

#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use DDG::Test::Goodie;
zci answer_type => 'conversion';
zci is_cached => 1;
ddg_goodie_test([qw(
DDG::Goodie::Base
)
],
'255 in hex' => test_zci(
'255 in base 16 is FF',
structured_answer => {
input => [255],
operation => 'Decimal to base 16',
result => 'FF'
}
),
'255 in base 16' => test_zci(
'255 in base 16 is FF',
structured_answer => {
input => [255],
operation => 'Decimal to base 16',
result => 'FF'
}
),
'255 in base 16' => test_zci(
'255 in base 16 is FF',
structured_answer => {
input => [255],
operation => 'Decimal to base 16',
result => 'FF'
}
),
'42 in binary' => test_zci(
'42 in base 2 is 101010',
structured_answer => {
input => [42],
operation => 'Decimal to base 2',
result => '101010'
}
),
'42 in base 2' => test_zci(
'42 in base 2 is 101010',
structured_answer => {
input => [42],
operation => 'Decimal to base 2',
result => "101010",
}
),
'42 to hex' => test_zci(
'42 in base 16 is 2A',
structured_answer => {
input => [42],
operation => 'Decimal to base 16',
result => '2A'
}
),
'42 to octal' => test_zci(
'42 in base 8 is 52',
structured_answer => {
input => [42],
operation => 'Decimal to base 8',
result => '52'
}
),
'10 in base 3' => test_zci(
'10 in base 3 is 101',
structured_answer => {
input => [10],
operation => 'Decimal to base 3',
result => '101'
}
),
'18442240474082181119 to hex' => test_zci(
'18442240474082181119 in base 16 is FFEFFFFFFFFFFFFF',
structured_answer => {
input => [18442240474082181119],
operation => 'Decimal to base 16',
result => 'FFEFFFFFFFFFFFFF'
}
),
'999999999999999999999999 to hex' => test_zci(
'999999999999999999999999 in base 16 is D3C21BCECCEDA0FFFFFF',
structured_answer => {
input => ["999999999999999999999999"],
operation => 'Decimal to base 16',
result => 'D3C21BCECCEDA0FFFFFF'
}
),
);
done_testing;