Perlã§tsvファイルç‰ã®åŒã˜è¡Œã‚’カウントã—ã¦ã¿ã‚‹ã‚¹ã‚¯ãƒªãƒ—ト - hogehoge foobar Blog Style Betatsvファイルã®å…ˆé 2列ãŒåŒã˜å€¤ã®è¡Œæ•°ã‚’カウントã™ã‚‹Perlスクリプトã§ã™ã€‚ 例ãˆã°ã€ 元ファイル 列A 列B hogehoge 12345 foobar 99999 hogehoge 12345 を〠出力ã•ã‚Œã‚‹ãƒ•ã‚¡ã‚¤ãƒ« 列A 列B 行数 hogehoge 12345 2 foobar 99999 1 ã¿ãŸã„ã«ã™ã‚‹ã‚‚ã®ã§ã™ã€‚ 今回ã¯ã‹ãªã‚Šæ‰‹æŠœããªã®ã§ã€å…ˆé 2列ã—ã‹å¯¾å¿œã§ãã¾ã›ã‚“。(※本当ã¯å†å¸°é–¢æ•°ã¨ã‹ä½œã£ã¦n列ã«ã‚‚対応ã§ãるよã†ã—ãŸã»ã†ãŒè‰¯ã„ã§ã™ã。) 忘れã£ã½ã„ã®ã§ã€è‡ªåˆ†ç”¨ã®å‚™å¿˜éŒ²ã¨ã—ã¦ã€ã¨ã‚Šã‚ãˆãšã‚³ãƒ¼ãƒ‰ã ã‘載ã›ã¦ãŠãã¾ã™ã€‚ サンプルコード(全体) #!/usr/bin/perl # # hash_key_total.pl # use strict; use warnings; use Carp; my $delimiter = '\t'; my %hash; # 1ã¤ã®å¼•æ•°ãŒå¿…è¦ i
node.js
{{#tags}}- {{label}}
{{/tags}}