Added tests for Rot13
parent
68f0cf4cd9
commit
3e9e679d7f
|
@ -34,6 +34,7 @@ ddg_goodie_test(
|
||||||
DDG::Goodie::PublicDNS
|
DDG::Goodie::PublicDNS
|
||||||
DDG::Goodie::Reverse
|
DDG::Goodie::Reverse
|
||||||
DDG::Goodie::Roman
|
DDG::Goodie::Roman
|
||||||
|
DDG::Goodie::Rot13
|
||||||
DDG::Goodie::SigFigs
|
DDG::Goodie::SigFigs
|
||||||
DDG::Goodie::TitleCase
|
DDG::Goodie::TitleCase
|
||||||
DDG::Goodie::Unicode
|
DDG::Goodie::Unicode
|
||||||
|
@ -130,6 +131,9 @@ ddg_goodie_test(
|
||||||
# Roman
|
# Roman
|
||||||
'roman 155' => test_zci('CLV (roman numeral conversion)', answer_type => 'roman_numeral_conversion', is_cached => 1),
|
'roman 155' => test_zci('CLV (roman numeral conversion)', answer_type => 'roman_numeral_conversion', is_cached => 1),
|
||||||
|
|
||||||
|
# Rot13
|
||||||
|
'rot13 This is a test.' => test_zci('ROT13: Guvf vf n grfg.', answer_type => 'rot13', is_cached => 1),
|
||||||
|
|
||||||
# SigFigs
|
# SigFigs
|
||||||
'sf 78' => test_zci('Significant figures: 2', answer_type => 'sig_figs', is_cached => 1),
|
'sf 78' => test_zci('Significant figures: 2', answer_type => 'sig_figs', is_cached => 1),
|
||||||
|
|
||||||
|
|
|
@ -0,0 +1,18 @@
|
||||||
|
#!/usr/bin/env perl
|
||||||
|
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
use Test::More;
|
||||||
|
use DDG::Test::Goodie;
|
||||||
|
|
||||||
|
zci answer_type => 'rot13';
|
||||||
|
zci is_cached => 1;
|
||||||
|
|
||||||
|
ddg_goodie_test(
|
||||||
|
[qw(
|
||||||
|
DDG::Goodie::Rot13
|
||||||
|
)],
|
||||||
|
'rot13 This is a test' => test_zci('ROT13: Guvf vf n grfg'),
|
||||||
|
);
|
||||||
|
|
||||||
|
done_testing;
|
Loading…
Reference in New Issue