s/Q//,s/([RBN])\1?(\1*)/$2/g,print/.{9}/^1,$/for<>