Форматирование вывода с помощью printf в Perl
Я пытаюсь отформатировать вывод, чтобы он выглядел как столбцы. Я пытаюсь использоватьPrintf функция.
Вот что у меня есть:
printf("%s %10s %12s %10s\n", "Qty", "Desc.", "Unit \$", "Total");
for ($he = 0; $he <= 6; $he++) {
if (@quantity[$he] != 0) {
printf("%d %10s %12.2f %10.2f\n", @quantity[$he], @selections[$he], @prices[$he], @prices[$he] * @quantity[$he])
}
}
Я пытаюсь сделать так, чтобы второй printf внутриif заявление оfor цикл совпадает с "Qty", "Desc.", "Unit \ $6$quot; и "Total."