#!perl -p
s; ;;g;s;0*;