Article View: es.comp.os.linux.programacion
Article #7099Re: Encriptacion de contraseñas en perl
From: Jose A
Date: Mon, 07 Apr 2003 12:40
Date: Mon, 07 Apr 2003 12:40
34 lines
2244 bytes
2244 bytes
Hola
En el art�culo <slrnb914en.tn.444398NOSPAM@tizona.dummy.net>, Samuel escribi�:
>
> Me da en la nariz que Mandrake usar� passwords MD5, as� que la llamada
> crypt no te servir� de mucho.
Crypt si sirve para mucho.
Las claves MD5 tienen la forma "$1$abcdefgh$password_md5", donde el "$1$"
identifica que es una clave md5, el "abcdefgh" es la salt que puede ser de
uno a ocho la longitud, y el siguiente "$" es el separador entre la salt y
la clave encriptada.
Para encriptar una clave usando MD5 solo tienes que hacer:
--------------------------cortar aqui-----------------------------
#!/usr/bin/perl
$password = "password"; # Aqui pones la password que quieras con un m�ximo
# de 127 caracteres.
$salt = '$1$abcdefgh'; # Aqui pones la salt con un m�ximo de 8 caracteres.
printf crypt ($password, $salt), "\n";
--------------------------cortar aqui-----------------------------
Es importante que se usen las comillas simples para el valor "$1$", pues si
usas comillas dobles ahi que ponerlo as�: "\$1\$", pues si no cree que estas
reciriendote a una variable.
Como ves, para que crypt use la encriptaci�n MD5 solo hay que usar el valor
"$1$" antes de la salt.
saludos.
Technical Details
Message-ID:
<slrnb92sej.5d4.MAQUI000@213.60.229.43>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!cyclone.bc.net!snoopy.risq.qc.ca!newsfeed.news2me.com!newshosting.com!news-xfer2.atl.newshosting.com!129.250.35.142.MISMATCH!iad-feed.news.verio.net!cesio.mundo-r.com!213.60.229.43!newsReferences:
<b6pgcv$7h755$1@ID-101278.news.dfncis.de> <slrnb914en.tn.444398NOSPAM@tizona.dummy.net>Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII X-Google-Thread: f86c8,a4f41b515bfdadf5 X-Google-Attributes: gidf86c8,public X-Google-ArrivalTime: 2003-04-07 05:57:36 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!cyclone.bc.net!snoopy.risq.qc.ca!newsfeed.news2me.com!newshosting.com!news-xfer2.atl.newshosting.com!129.250.35.142.MISMATCH!iad-feed.news.verio.net!cesio.mundo-r.com!213.60.229.43!news From: Jose A <MAQUI000@NOSPAM.mundo-r.com> Newsgroups: es.comp.os.linux.programacion Subject: Re: Encriptacion de contraseñas en perl Date: Mon, 7 Apr 2003 14:40:52 +0200 Organization: R Cable y Telecomunicaciones Lines: 34 Message-ID: <slrnb92sej.5d4.MAQUI000@213.60.229.43> References: <b6pgcv$7h755$1@ID-101278.news.dfncis.de> <slrnb914en.tn.444398NOSPAM@tizona.dummy.net> NNTP-Posting-Host: 213.60.229.43 Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit User-Agent: slrn/0.9.7.4 (Linux)