> cat replaceRule.txt 置換対象 置換後 joshua@slive.com @gmail.com shinsuke-m@a.com matumoto-s@b.com > perl transposeMAddressUsingTransRule.pl dev_200111 replaceRule.txt > dev_200111~
> perl getRelationWithCluster.pl dev_200110 dev_200111 dev_200112 > dev_200110.net
> perl mergeNetworksByName_v2.pl dev_200110.net user_200110.net > merge_200110.paj
> perl coordinator_metrics.pl merge_200111.paj
pajekにマクロを食わせるだけ. ただしファイルの絶対パスを適切なものに書き換える必要あり
perl correctMetricsUniq.pl merge_200111.paj degree_input_200111.vec degree_output_200111.vec degree_all_200111.vec ... >
> cat top5.txt "jslive@gmail.com" "wrowe@rowe-clan.net" "nick@.." > perl makeSandglass.pl merge_200111.paj top5.txt > merge_200111_emp.paj