1package FooBarBaz; 2use strict; 3use warnings; 4# HARNESS-DURATION-SHORT 5 6use Test2::V0; 7 8is([caller(0)], [], "No caller at the flat test level"); 9is(__PACKAGE__, 'FooBarBaz', "inside main package"); 10like(__FILE__, qr/caller\.t$/, "__FILE__ is correct"); 11is(__LINE__, 11, "Got the correct line number"); 12is($@, '', '$@ set to empty string'); 13 14done_testing;