Объединить ключи и значения в perl

У меня есть хеш со следующей парой ключ / значение

4 => model1
2 => model2 

Мне нужна следующая строка, созданная из вышеуказанного хеша

4 X model1 , 2 X model2

Я пробовал следующее

my %hash,
foreach my $keys (keys %hash) {
    my $string = $string . join(' X ',$keys,$hash{$keys});
}
print $string;

Я получаю

4 X model12Xmodel2

Как я могу достичь желаемого результата 4 X модель1, 2 X модель2 ?

6
задан Adi Inbar 19 September 2013 в 04:41
поделиться