package Monks;

use strict;
use warnings;
use Monks::Data;

BEGIN
{
    use Exporter;
    our $VERSION = 0.01;
    our @ISA     = qw(Exporter);
}

sub version
{
    $Monks::VERSION
}

sub new
{
    my $class = shift;

    my $self = { @_ };
    bless $self, $class;

    return $self;
};

sub check_fluffy
{
    return Monks::Data::is_fluffy($_[1]);
}

sub find_fur_texture
{
    return Monks::Data::get_texture($_[1]);
}

1;