driver.pl

use TestModule;

print "I am exiting now.\n";
[download]

TestModule.pm

package TestModule;

our $x = 0;
$DB::single = 1;
our $y = $x + 1;
our $z = $y ** 3;

sub blah { "blah!" }

1;
[download]

...and run perl -d driver.pl, the debugger immediately stops at the line our $y = $x + 1. Do you get different results?