my $code  = 'package '.$pkgnam.';
                 use vars qw($'.$varname.');
                    $'.$varname.' = "'.$value.'";
                ';

    eval $code; 
    $@ and die "Error in exporting var $varname: $@";