Pregunta PERL

[Cristian Gutierrez]

mramirez en iciuchile.cl wrote:
> Masters:
> Necesito borrar unos archivos desde un script PERL ubicados en un
> directorio. He probado todas las formas que he visto en la Inet , pero
> no me resulta. La verdad es que no soy muy experimentado en
> PERL. Quizas uds.me podrian ayudar un poco.

,----
| $directorio = '/home/user/public_html/salida';
| 
| opendir DIR, $directorio;
| map { unlink "$directorio/$_" } grep { /\.txt$/ } readdir DIR;
| closedir DIR;'
`----

(sin parentesis, a lo mero macho ;-)

-- 
Cristian Gutierrez			http://www.dcc.uchile.cl/~crgutier
crgutier[@]dcc.uchile.cl                        Jabber:crgutier en jabber.org

The question of whether computers can think is like the question of
whether submarines can swim.
                              -- Edsgar Dijkstra