$counter=0;
foreach (sort keys(%hashone))
{
	$hashone{$counter} = $hashone{$_};
	delete $hashone{$_};
	$counter++;
}