- eval { foo 3 };
- is($@, '', 'compiled to foo(3)');
- is($foo, 3, 'main::foo was really called');
+ eval { foo 2 };
+ is($@, '', 'compiled to foo(2)');
+ is($foo, 4, 'main::foo was really called');
+
+ eval { subs::auto::Test::Pkg::foo 3 };
+ is($@, '', 'compiled to subs::auto::Test::Pkg::foo(3)');
+ is($foo, 9, 'subs::auto::Test::Pkg::foo was really called');