use strict;
use Test::More 'no_plan';

use Text::Emoticon;

for my $driver (qw( MSN Yahoo )) {
    eval {
        my $emo = Text::Emoticon->new($driver);
        my $f = $emo->filter('Hi :)');
        like $f, qr/img/;
    };
    if ($@) {
        diag( "new version of $driver module needed." );
        pass;
    }
}