$max = $max-1; # I don't want it to count the \r|\032 print "X" x $max,"\n";