Here is a tiny perl program for creating 10 character random alphanumeric passwords with mixed case.
#!/usr/bin/perl@a=(0..9,a..z,A..Z);for(1..10){print@a[rand@a]}print"\n"