Using perl Syntax Highlighting
- my $local=3;
- print LOG "*seg ***$seg \n";
- our ($yr_txt,$mes_txt,$dia_txt,$hora_txt,$min_txt, $seg_txt) = Add_Delta_DHMS($yr,$me,$dia,$hora,$min,$seg, 0,-$local, 0 ,0);
- $yr_txt = sprintf "%2d",$yr_txt;
- $mes_txt= sprintf "%2d",$mes_txt;
- $dia_txt= sprintf "%2d",$dia_txt;
- $hora_txt= sprintf "%02d",$hora_txt;
- $min_txt= sprintf "%02d",$min_txt;
- print LOG "**seg *1 *$seg \n";
- print LOG "**txt **$seg_txt \n";
- $seg_txt= sprintf "%5.2f",$seg_txt;
- print LOG "****$seg_txt \n";
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
Mi problema es que la variable $seg_txt, me toma solo la parte entera de la información y yo necesito los segundos tal y como vienen en la variable $seg.
Ejemplo de como lo muestra en el LOG:
*seg ***35.30
**seg *1 *35.30
**txt **35
****35.00
Necesito los segundos como 35.30 y no como 35.00. En Windows me funciona bien pero no sé por qué queda 35.00 en Linux.
Disculpen la molestia pero alguien me podría ayudar o decirme si tengo que usar otra función para Linux, o si debería usar otras soluciones. Vi varios ejemplos en el foro pero ninguno parecido a mi problema.
Muchas gracias por su tiempo...
