package Foo;
use Benchmark qw{cmpthese};

package main;
cmpthese( -1, { ...etc... } );

__END__
Undefined subroutine &main::cmpthese called at - line 7.