Using perl Syntax Highlighting
- foreach my $file (@ARGV) {
- my $fh;
- unless (open $fh, $file) {
- warn "$0: open $file: $!";
- next;
- }
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Bueno, a mi parecer, el significado que doy es este:
- En primer lugar con foreach se recorre cada elemento de la matriz ARGV que contiene los parámetros pasados al script (supongo que la variable $file guardará en cada iteración un elemento de la matriz, pero no entiendo el por qué la declaración con my, y tampoco el por qué del uso de la variable)
- Donde me pierdo es en el FILEHANDLE especificado en open(). Sé que se puede usar una EXPR en lugar de darle un nombre a FILEHANDLE pero no entiendo el uso de la variable $fh, además de que ésta también está definida con my pero no está declarada, por lo tanto ¿su valor en cada iteración no sería el mismo? Yo pienso que la variable $fh en cada iteración y para cada archivo creaba un descriptor de archivo con un nombre diferente y que era ese su uso, pero de ello no estoy seguro.
