#!perl

use strict;
use warnings;

use Test::More tests => 2;

use Data::UUID;

eval {
    Data::UUID->create;
};
like $@, qr{self is not of type Data::UUID};

ok 1;