in reply to Display # ++s & --s along with node reputation
See also this thread and my Perlish Tension for possible alternatives.
$|=$_="1g2i1u1l2i4e2n0k",map{print"\7",chop;select$,,$,,$,,$_/7}m{..}g
In Section
Perl Monks Discussion