perl - 出力時に配列内の要素を再フォーマットする方法は?

Question

Perl を使用して、次の形式のコンマ区切りデータを読み込む必要があります

郵便番号、郵便番号内の都市の数、郵便番号内の各都市のリスト。これはバニティシティで実際に機能しているため、郵便番号を使用するすべての都市のリストを取得できます。

これを書き出すときは、次のようなものが必要です

{zipcode,"number of cities,list of cities"}

chomp を配列に使用すると、zipcode が array[0] に、number が array[0] に、次にリストで名前が付けられた都市ごとに 1 つの要素が配置されます。リストには 1 つの都市または 70 の都市が含まれる可能性があります。その配列から必要な形式に変換するにはどうすればよいですか。基本的には、ビッグ データ プラットフォームから作成された入力ファイルを取得し、プラットフォームへのプラグインとして使用される C# プログラムにフォーマットします。

Answer 1

my $zipcodes = { 33401 => ['West Palm Beach','Green Acres'] }; #initial entries
push($zipcodes->{33401}, 'Jupiter'); #or add entries by pushing them into the array
print '{33401,"' . @{$zipcodes->{33401}} . ',' . join(',',@{$zipcodes->{33401}}) . "\"}\n";

#prints {33401,"3,West Palm Beach,Green Acres,Jupiter"}