perl -e 'print 312023," ",312," ",023,"\n";' 312023 312 19