package Classy;
use strict;
use warnings;


sub import {
    my $pkg = (caller())[0];
    eval 'require Str';
    
    no strict 'refs';

    *{"${pkg}::var"} = \(my $var);
    

}

1;