use strict;
use warnings;

my $str = 'string';
*bar = $str;

print $bar; # not imported