xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/lib/dprof/test7_t (revision 0:68f95e015346)

BEGIN {
	print "in BEGIN\n";
}

sub foo {
	print "in sub foo\n";
}

foo();