Test the application end-to-end

---

• This is a very old test, and even then it did not work
• As it assumes a given content of that page

examples/mock-lwp/t/webapi.t

use strict;
use warnings;

use Test::More;

use MyWebAPI;

my $w = MyWebAPI->new('http://www.dailymail.co.uk/');

diag explain $w->count_strings('Beyonce', 'Miley Cyrus');

is_deeply $w->count_strings('Beyonce', 'Miley Cyrus'),
    {
        'Beyonce'     => 26,
        'Miley Cyrus' => 3,
    };

done_testing;