t/gearman.t

   1 #!/usr/bin/env perl
   2 use warnings;
   3 use strict;
   4
   5 use Test::More tests => 4;
   6 use lib 'lib';
   7
   8 use_ok 'MojoX::Gearman';
   9
  10 my $g = new_ok 'MojoX::Gearman';
  11
  12 ok( my $echo = $g->req( 16, "foobar" ), 'echo' );
  13 cmp_ok $echo, 'eq', "foobar";