Script CAPS

[Cristian Gutierrez]

Ayer en la ma~nana, Cristian Gutierrez dijo:
> Hoy en la noche, Gustavo Chain dijo:
>> Holap, quisiera saber como debería hacer un script q transformara (de
>> manera recursiva) archivos o carpetas escritos en mayusculas a
>> minusculas.
>>
>> FILE.XYZ ---> file.zyz
>
> Aqui va mi intento de solucion; gustoso acepto criticas:
>

[...]
> | /tmp $ find dir  -depth -print0 |\
> |        perl -MPOSIX -ln0e '
> |          if (/(.*\/)([^\/]+)$/) {
> |            my ($prefix, $last) = ($1,$2);
> |            $cwd = getcwd;
> |            chdir $prefix;
> |            rename($last, uc $last);
                             ^^
> |            chdir $cwd;
> |          } else { rename($_, uc $_) }
                                 ^^
[...]

Sorry, esos dos eran `lc'. La version reducida del otro mensaje esta ok
:)

-- 
Cristian Gutierrez                      http://www.dcc.uchile.cl/~crgutier
[EMAIL PROTECTED]                        Jabber:[EMAIL PROTECTED]

Netscape vs OE as the best newsreaders?  Hm... kind of like Escort vs
Cavalier as the best compacts.  Xnews, Agent, Pine, slrn, now we can
have a discussion.  Wait a minute, Gnus.  Oh, discussion over :-)
--  Galen Boyer