print '-' x $number;