Formato con sprintf en Perl
Plantillas al estilo printf para columnas, relleno y bases numéricas.
use strict;
use warnings;
my $item = "espresso";
my $price = 3.5;
my $qty = 12;
printf "%-12s \$%5.2f\n", $item, $price;
printf "%08.3f\n", 3.14159;
printf "hex %x, octal %o, binary %b\n", 255, 255, 255;
my $row = sprintf "| %-8s | %6.2f |", $item, $price * $qty;
print "$row\n";
Cómo funciona
%-12salinea un nombre a la izquierda;%5.2falinea un precio a la derecha con dos decimales.%08.3frellena con ceros;%x,%oy%bimprimen un mismo valor en tres bases.sprintfdevuelve la cadena en vez de imprimirla — útil para armar filas de tabla.
Palabras clave y builtins usados aquí
myprintprintfsprintfuse
El intento, en números
- Líneas
- 13
- Caracteres a escribir
- 282
- Tokens
- 66
- Ritmo de tres estrellas
- 70 tpm
Al ritmo de tres estrellas de 70 tokens por minuto, este intento toma unos 57 segundos.
Paso 2 de 3 en Cadenas; paso 14 de 27 en Fundamentos del lenguaje.