well, i created the string with a linux-tool on the radius-server (freeradius). It is used as:
cryptpasswd --md5 <password>.

Free pascal has a unit that does exactly what your posted perlscript code does
http://florianklaempfl.de:8000/fpctrunk/file/70e283550952/packages/hash/src/unixcrypt.pas#l1

But, as the perl script, uses an imported crypt function. You just need to import it from the same dll Perl use.
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to