Using perl Syntax Highlighting
#!C:\perl\bin\perl.exe -X
use cgi;
require "divs.pl";
use CGI::Carp "fatalsToBrowser";
use File::Grep qw( fgrep fmap fdo );
print "Content-type: text/html","\n\n";
my @matches = fgrep { /GOBIERNO/} glob "C:\AppServ\www\pdf\*txt";
print SUMMARY $_ foreach @matches;
use cgi;
require "divs.pl";
use CGI::Carp "fatalsToBrowser";
use File::Grep qw( fgrep fmap fdo );
print "Content-type: text/html","\n\n";
my @matches = fgrep { /GOBIERNO/} glob "C:\AppServ\www\pdf\*txt";
print SUMMARY $_ foreach @matches;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
donde le estoy diciendo que quiero buscar la palabra GOBIERNO y le indico la ruta, pero, al momento de ejecutarlo no me muestra nada, no me muestra errores pero no me muestra nada, aparece en blanco la pantalla.
No sé si alguien pudiera echarme la mano, ¡¡soy nueva en esto!! ¡¡Gracias!!