Using perl Syntax Highlighting
- my @files =
- ('C:/xampp/htdocs/aca.txt','C:/xampp/htdocs/aca.txt',niclog','/var/log/exim/paniclog','/var/lo/exim/rejectlog','/var/log/exim_rejectlog');
- open(FILE,">>aca.txt");
- for my $linea(@files) {
- $linea=~s/\/\\//;
- print FILE '"'.$linea.'",';
- }
- close FILE;
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4
¿ Alguien puede ayudarme ?