Как я пишу текст в выровненных столбцах в Perl?
Я использую xunit, поэтому это то, что я использую: Debugger.Log(0, "1", input);
PS: вы можете использовать Debugger.Break();, чтобы вы могли видеть, что вы входите в систему out
5 ответов
Разграниченные вкладкой данные (где поля не последовательны в длине) приводят в порядок не строку при открытии в текстовом редакторе.
Решения:
- Открывают файл в электронной таблице.
- Открытый это, одним словом, процессор, выберите весь текст и определите соответствующие позиции табуляции. (спасибо, Justsalt)
- В Вашем текстовом редакторе, устанавливает Вашу вкладку width на значение, больше, чем любое из Ваших полей.
- Использование располагает с интервалами вместо вкладок (например,
printfс шириной поля, или форматы ).
, Например, Вы могли бы использовать
printf("%-15s %-15s %-10s %9s\n", $name, $edu, $car, $cash);
- после % причины поле, которое оставят выровненными по ширине. Числа (как деньги) обычно выровнены по правому знаку (который является значением по умолчанию).
Взгляните на Perl6:: Форма модуль CPAN.
Этот предыдущий вопрос/ответ , Что Другие Языки Имеют Функции И Или Библиотеки, Подобные Формату Perls на stackoverflow, может помочь.
В дополнение к пути C printf можно скорректировать ширину динамично с "*",
printf FILE ("%*s%*s%*s\n", 20, "Name", length($blah), "Ed", 20, "Car");
printf делает это как в C. Для 20 символьных полей:
printf("%20s%20s%20s$20S\n",$name,$ed,$car,$money);