> Anyone?
>
> I thank you in advance for your time.
>
>
try it before you use it ;-)
Change file.csv to the name of the file
#!/usr/bin/perl
open (DATA, "cat ./file.csv | ");
while(<DATA>)
{
($userid,$rest) = split (/,/$_,2);
$pass = `echo -n $userid | md5sum | cut -d" " -f1`;
print "$userid,$pass";
}
close(<DATA>);