# MyUtils.pm

package MyUtils;

use warnings;
use strict;

{   no strict 'refs';

    my $importing_package = (caller 0)[0];

    ${ $importing_package . '::var' } = 42;

    }

1;