use strict;
use warnings;
use lib '.';

use Classy ;

my Str $a ="Goliath";       # no compilation error

$var //= 'Philistine';      # no compilation error

print $var;

##</code><code>##

package Classy;
use strict;
use warnings;


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

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

}

1;