Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - leogtz

#2291
En mi articulo sobre "Acciones con archivos de texto", comenté como meter las líneas de un archivo en variables independientes, puedes consultarlo si quieres.
Código (dos) [Seleccionar]

@echo off
setlocal enabledelayedexpansion
set contador=0
for /f "eol= tokens=* delims=" %%x in (file.txt) do (
set /a contador+=1
set linea!contador!=%%x
)
set linea


Para acceder a una línea en especifico, podrías hacer :
echo !linea%contador%!

En el caso de el código que has propuesto, este:
setlocal enabledelayedexpansion

:reader
set c=0
for /f "tokens=*" %%a in (archivo.txt) do (
            set /a c+=1
            call set lin!c!=Linea_!c! = %%a
)
echo Archivo Leido

for /l %%n in (1,1,!c!) do (echo !lin%%n!)
pause
endlocal


Para asignar :
set "variable=!lin%indice%!"
Para mostrar es lo mismo:
echo !lin%indice o valor%!

Saludos.
#2292
Scripting / Re: Buscar en Wikipedia [PERL]
24 Agosto 2009, 06:43 AM
Seguro se puede con python.

Al script le asigné un alias y así puedo consultar cuando quiera desde mi consola.

leo@lein:~/Escritorio/pl$ wiki "lala"

Los 'lala' son un grupo de habla chibemba de unos 150000 individuos que viven en
Zambia central, al oeste del río Luangua.
leo@lein:~/Escritorio/pl$


Jaja.

Bueno, saludos a todos.

Hoy me reina el entusiasmo.
#2293
Scripting / Re: Buscar en Wikipedia [PERL]
23 Agosto 2009, 18:34 PM
Gracias.

Por cierto, es posible que "batallen" un poco instalando los módulos adecuados para que corra el script, si es así me avisan y les ayudo. (a los linuxeros, claro, no tengo un Windows a la mano).
#2294
Scripting / Re: Buscar en Wikipedia [PERL]
23 Agosto 2009, 18:03 PM
Cita de: dynyck en 23 Agosto 2009, 17:55 PM
CitarCódigo: Conjunto de líneas.
:xD

Me gusta bastante Leo, yo siempre he buscado ese tipo de cosas.

Una pregunta... Será que se puede ocupar para buscar info en Cplusplus?



Los únicos modulos sobre cplusplus son:
http://search.cpan.org/search?query=cplusplus&mode=all


Pero algo de perl lo consigues fácil, yo en este caso no sé mucho, estoy aprendiendolo, pero como "hobie", me encanta el poder que tiene para manejar texto, sus expresiones regulares y los miles de modulos que hay.

Tal vez el programa es una "chorrada", pero en fín, cumple para lo que está hecho, hacer una busqueda en Wikipedia par a una persona que odia usar el mouse y le encanta usar su consola de comandos.

Pero, bueno, gracias por comentar el código.

PD : En scripting se ve muy poco Perl.  :-(
#2295
Scripting / Re: Buscar en Wikipedia [PERL]
23 Agosto 2009, 17:41 PM
Pues depende de para ti que sea un código, Perl se caracteriza para que con unas pocas líneas, puedas armar algo interesante, esa es su filosofía, en este caso yo dije que me encanta usar la consola, paso mucho tiempo allí, por lo que se me hace más fácil leer información desde allí que abrir el navegador y teclear.

Pero, bueno, me extraña que critiques un código así, sabiendo que tu tutorial sobre Perl es pesimo y tu nivel en Perl es infimo.
#2296
Código (dos) [Seleccionar]
for /f "tokens=2,3,4" %%a in ('attrib "archivo.ext"') do (
echo Atributos :  %%a %%b %%c
)
#2297
Bien hecho.

Para poner códigos, usa la etiqueta
#2298
Scripting / Re: Buscar en Wikipedia [PERL]
23 Agosto 2009, 02:01 AM
Hay modulos para todo, hay miles en cpan.

Naaa, yo uso la consola para todo, solo me falta chatear desde la consola, pero sí pienso hacerlo.

:D
#2299
Con el comando for, parametro /f.

No tengo un windows hace mucho pero podría ser así:
for /f "tokens=1" %%_ in ('attrib "archivo.ext"') do (
echo Atributo de mi archivo: %%_
)

%%_ lo puedes asignar a una variable dentro del mismo bucle.

Saludos.
#2300
No te desgastes haciendo eso.

Usa el parametro /i (Ignore), para casos insensitivos.

if /i "%variable%"=="Hola" (
Accion...
)


En otro caso, podrías concatenar varios IF así:
if %variable%==ALGO (
if %variable%==Si (
accion
)
)