use strict;
use warnings;

our ($database);

$database = "test1";

##</code><code>##

use strict;
use warnings;

our ($database);

$database = "test2";

##</code><code>##

require "a.pl";
print "$database\n";
require "b.pl";
print "$database\n";
require "a.pl";
print "$database\n";

##</code><code>##

test1
test2
test2

##</code><code>##

test1
test2
test1