my $expected_version = "0.007";
print("import: B::COW\n");
use B::COW;

if (defined B::COW->VERSION) {
	my $given_version = B::COW->VERSION;
	$given_version =~ s/0+$//;
	die('Expected version ' . $expected_version . ' but found ' . $given_version) unless ($expected_version eq $given_version);
	print('	using version ' . B::COW->VERSION . '
');

}
