#!/usr/bin/perl 
use strict;
use warnings;

use Mymodule qw( values );
use Test::More qw(no_plan);

BEGIN { use_ok('Mymodule', qw( values )) };

my $pig = 3;
my $cow = 4;

is( values($pig, $cow ),  (3 and 4),  "checking values" ) ;