[Perl] Impresion de 2 digitos en vez de 1 ???
Adrian Galindo
agalindo@liceaga.facmed.unam.mx
Thu, 12 Dec 2002 12:52:40 -0600
Ricardo Cumberbatch L. wrote:
> Disculpen mis insistencia pero al yo decir concatenar es para poder usar
> dicho valor en otro proceso.
>
> Ejm:
>
> num01
> .
> .
> .
>
> adduser num01
>
> por dar un ejemplo,
>
> Gracias por la ayuda,
Pues mira mi estimado, con todo respeto, tienes que ponerte a estudiar
para poder programar. Los manuales que vienen con la misma instalación
de Perl están muy completos. Nomás teclea:
man perl
man perlfunc
Sobre tu pregunta, pues como siempre, hay más de ua forma de hacerlo.
Siguiendo con lo que mencionó Toño, puedes usar la función sprintf. En
el manual mencionado viene su descripción.
...
Pero bueno, aquí está lo que pides:
perl -e 'for (1..10){$var1 = "num".sprintf "%02d", $_; print "$var1\n"}'
Saludos.
Adrián.