print randStr(8)."\n"; sub randStr { return join('', map{('a'..'z','A'..'Z',0..9)[rand 62]} 0..shift); }