PageRenderTime 39ms CodeModel.GetById 13ms RepoModel.GetById 0ms app.codeStats 0ms

/t/IsItUp.t

https://github.com/aembleton/zeroclickinfo-spice
Perl | 30 lines | 23 code | 4 blank | 3 comment | 0 complexity | 7894367ab43f014aea82d701f5c23cbf MD5 | raw file
  1. #!/usr/bin/env perl
  2. use strict;
  3. use warnings;
  4. use Test::More;
  5. use DDG::Test::Spice;
  6. use utf8;
  7. ddg_spice_test(
  8. [qw( DDG::Spice::IsItUp )],
  9. 'is duckduckgo.com up?' => test_spice(
  10. '/js/spice/is_it_up/duckduckgo.com',
  11. call_type => 'include',
  12. caller => 'DDG::Spice::IsItUp',
  13. is_cached => 0
  14. ),
  15. 'is http://duckduckgo.com up?' => test_spice(
  16. '/js/spice/is_it_up/duckduckgo.com',
  17. call_type => 'include',
  18. caller => 'DDG::Spice::IsItUp',
  19. is_cached => 0
  20. ),
  21. # unfortunately, the isitup.com api does not
  22. # currently support unicode or ssl
  23. 'is føtex.dk up?' => undef,
  24. 'is https://føtex.dk up?' => undef,
  25. );
  26. done_testing;