#change this: $u=$q=~s/\n\s//xg && -2; #to this $u=$q=~s/\s//xg && -2;