$s=$,=$",print/.+?(??{$&*6<$s?a:!($s+=$&)})/g,"=$s "for<>