diff --git a/t/rafl.t b/t/rafl.t new file mode 100644 index 000000000..bee293eb2 --- /dev/null +++ b/t/rafl.t @@ -0,0 +1,26 @@ +#!/usr/bin/env perl + +use strict; +use warnings; +use Test::More; +use DDG::Test::Goodie; + +zci is_cached => 0; +zci answer_type => 'rafl'; + +ddg_goodie_test( + [qw( + DDG::Goodie::Rafl + )], + 'rafl' => test_zci( + qr/rafl.*everywhere/i, + ), + '!rafl' => test_zci( + qr/rafl.*everywhere/i, + ), + 'rafl everywhere' => test_zci( + qr/rafl.*everywhere/i, + ), +); + +done_testing;