elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Arreglado, de nuevo, el registro del warzone (wargame) de EHN


  Mostrar Mensajes
Páginas: [1]
1  Programación / Scripting / Re: scrip de perl en: 28 Mayo 2004, 19:38 pm
Para ejecutar un prorgama externo a perl,se pude utilizar  system( " lo q sea" ) o la comilla invertida y ejecuta un comando cualquiera q le indiques,  pero no se puede recojer lo q muestra el comando para utilizarlo dentro de mi programa en perl. La forma para hacer eso es la siguiente:


Código:
open(USUARIO,"whoami|"); #redireccionamos la salida del comando a un pipe
$usuario =<USUARIO>; #leemos del pipe
close(USUARIO);
chomp($usuario);

Con este codigo obtenemos en la variable $usuario lo q ha devuelto el comando 'whoami' ,  de la misma forma se puede utilizar con cualquier comando, como du por ejemplo. ;)
 Haz un "man du" en la consola y mira como funciona. Para pasar parametros al comando:

open(USUARIO,"du $param1 $param2 |"); # ejemplo


salu2
2  Programación / Scripting / Re: scrip de perl en: 26 Mayo 2004, 10:26 am
Pues no parece complicado,mira:  yo llamaria a otros programas tipicos de linux, como 'whois' ,  'du'  y trabajaria con el fichero /etc/passwd. Con esas tres cosas ya puedes extraer toda la informacion q necesitas mostrar.

t doy mas pistas ;) utilizaria 'whoami' para saber q usuario soy, buscaria la linea correspondiente en el /etc/passw. De ahi saco el directorio home, el uid, y poco mas.... ves por donde va la cosa?? :)

salu2


Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines