I would just be more explicit as to where these variables are stored if I wanted to make certain there were available in evals:

#!/usr/bin/perl -w

sub {
    package Romania;
    our $v = 111;
        eval q(
        eval 'print $v, "\n"'; # 111
        eval 'print $v, "\n"'; # still 111 of course
    );
}->();

print qq~----\n~;

print qq!$Romania::v\n!;
[download]

Prints..

111
111
----
111
[download]