##BUGBYPASS: [for Module::Build v0.3 and perl v5.10+ $^V version string change] repairs incorrect version interpretation for perl v5.10+ (still works for 5.8 and earlier, as well)
sub my_varchname {  # Copied from PPMMaker.pm
  	my ($self, $config) = @_;
  	my $varchname = $config->{archname};
  	# Append "-5.8" to architecture name for Perl 5.8 and later
  	#if (defined($^V) && ord(substr($^V,1)) >= 8) {
  	#$varchname .= sprintf("-%d.%d", ord($^V), ord(substr($^V,1)));
	#}
	## BUGFIX: send to Module::Build::PPMMaker and PPM
	if (defined($^V)) {
		my @v = split(/\./, sprintf(qq{%vd},$^V));
		if ($v[1] >= 8) {
		  	$varchname .= '-'.$v[0].'.'.$v[1];
		  	}
      		}
	return $varchname;
}