Help for this page
perl -nE '$count{$1}++ while /\b(the|hi|linux)\b/ig; END{say "$_ => $c +ount{$_}" for keys %count}' filename.txt
#!/usr/bin/perl ... } print "$_ => $count{$_}\n" for keys %count;
www.com | www.net | www.org
No recent polls found