perl - perl のコマンドラインからハッシュを作成する

Question

以下のようなデータを含むファイルがあります。

4  1
7  12
2  5
4  4
6  67
12  5

コマンドラインを使用して、すべての行を次のような配列に分割できます。

perl -F'\s+' -ane 'print $F[0]' file

したがって、すべての最初のフィールドが出力されます。上記のコマンドは、すべての行を配列に変換します。同様の方法で、キーを最初のフィールドとし、各キーの値を 2 番目のフィールドとしてハッシュを作成する行を作成できます。

Answer 1

これを試して：

perl -MData::Dumper -ane '$X{$F[0]}=$F[1]}{print Dumper \%X' file

Answer 2

はい、できます。

perl -MData::Dumper -e '%a = map { (split)[0,1] } <ARGV>;print Dumper \%a' dt.txt