#!/usr/bin/perl
$clearpwd=$ARGV[0];
open(OUTFILE,">.shadow")||die "Could not create file .shadow. $!\n";
@letters = ('A' .. 'Z', 'a' .. 'z', '0' .. '9', '/', '.');
$salt = $letters[rand@letters] . $letters[rand@letters];
$crptpwd=crypt($clearpwd,$salt);
print OUTFILE $crptpwd;
close(OUTFILE);
davidb said:I put the .shadow file in the dir, but the problem still exists..
any more help?
this is driving me insane..