Quick and dirty perl: perl -MJSON -F, -lane ' print encode_json({ domain => shift @F, emails => [map {{email => $_, First=>"xyz", ...
確定! 回上一頁