リスト内で順序付けされていないペアの数を見つける方法

リスト内で順序付けされていないペアの数を見つける方法

リスト内で順序付けされていないペアの数を計算したいと思います。

つまり、リストがあります。

ab
ba
ac
bc

表示したい内容:

2 ab
1 ac
1 bc

ベストアンサー1

これは良いことのようですperl

perl -F -lane '$count{join "", sort @F}++;
               END{print "$count{$_} $_" for sort keys %count}' < your-file

おすすめ記事