($a.=chr rand 128)=~s/[^\w\d]//while length$a<8;say$a