zeroclickinfo-goodies/t/AspectRatio.t

22 lines
498 B
Perl

#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use DDG::Test::Goodie;
zci answer_type => 'aspect_ratio';
zci is_cached => 1;
ddg_goodie_test(
[qw(
DDG::Goodie::AspectRatio
)],
'aspect ratio 4:3 640:?' => test_zci('Aspect ratio: 640:480 (4:3)'),
'aspect ratio 4:3 ?:480' => test_zci('Aspect ratio: 640:480 (4:3)'),
'aspect ratio 1:1.5 20:?' => test_zci('Aspect ratio: 20:30 (1:1.5)'),
'aspect ratio 1:1.5 ?:15' => test_zci('Aspect ratio: 10:15 (1:1.5)'),
);
done_testing;