All pastes #802353 Raw Edit

Mine

public text v1 · immutable
#802353 ·published 2007-11-30 02:29 UTC
rendered paste body
alias funban {
  var %ban $1-,%z $len($1-)
  while (%z) {
    mode # +b %ban
    var %ban $left(%ban,-1)
    dec %z
  }
}