package Fruit;
require Exporter;
@ISA = qw(Exporter);
@EXPORT_OK = qw//;
use warnings;
use strict;

sub new
{
    return bless {};
}


sub Fruit::read
{
    print "OK\n";
}

1;