Estaba usando mi debian con compiz, muy feliz de mi ambiente gráfico, estabilidad y tranquilidad que se siente. Bueno, entrando en materia, nos encontramos con un texto, en el cual queríamos saber cuantas veces se repetía una palabra en específico. Linuxero al fin, quería hacerlo en linea de comando utilizando grep, tail etc. Intente por varios minutos y no pude. Puse una nota recordatoria para buscar la manera de realizarlo en otro momento (claro, por linea de comando, como quería).
En fin, después de una larga búsqueda encontré este script en perl.
usando Perl:
ejecute esto así :
Fuente: www.unix.com
Código:
#!/usr/bin/perl # search_word.pl my $search_this = shift; my $count = 0; while (<>) { while (m/\b$search_this\b/g) { $count++; } } if ($count == 0) { print $ARGV . "does not contain " . $search_this . "\n"; } else { print $ARGV . " contains " . $search_this . " " . $count . " times \n"; }
Código:
$ perl search_word.pl 200 nombre_archivo