perl -nE '$count{$1}++ while /\b(the|hi|linux)\b/ig; END{say "$_ => $count{$_}" for keys %count}' filename.txt