1 use Mojo::Base -strict; 2 3 use Test2::V0; 4 5 use FindBin; 6 use lib "${FindBin::Bin}/../lib/"; 7 use lib "${FindBin::Bin}/lib/"; 8 use Dashboard::Test qw(test_app); 9 10 my $t = test_app(); 11 12 $t->get_ok('/probes/status') 13 ->status_is(200) 14 ->element_exists('main.container') 15 ->element_exists('.list-group'); 16 17 for my $item (qw(hub ph do orp ec)) { 18 $t->element_exists( 19 qq{[data-status-page-item="$item"] [data-status-page-state]}); 20 } 21 22 for my $probe (qw(ph do orp ec)) { 23 $t->element_exists( 24 qq{[data-status-page-item="$probe"] h2 a[href="/probes/$probe"]}); 25 } 26 27 $t->element_exists_not('[data-status-page-item="hub"] h2 a'); 28 29 done_testing; 30