Cuestión : Un problema del módulo de la fecha del Perl

Hola, el

I puede recuperar la fecha de hoy usar fecha:: Módulo del Calc. ¿Puede usted los pls ayudar en cuanto a cómo puedo recuperar minutos de hoy de la hora y tiempo de los secs usar el mismo módulo en otro variable dicen $cob_date1? class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
fecha notpretty del >use " del class= " de " codeSnippet836742 del id= del
class= del

Respuesta : Un problema del módulo de la fecha del Perl

Para simplificar y ampliarse en lo que usted tiene, usted puede hacer esto…
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

fecha del uso:: Qw del Calc (: todos);

mi @mon = qw (enero febrero marcha abril puede junio julio agosto sept oct nov diciembre);

_getCOB secundario {

    mi @date = hoy ();

    # comentado hacia fuera puesto que no utilizado
    #my $dow = Day_of_Week (@date);

    mi $date = $date [2]. “-”. $mon [$date [1]]. “-”. $date [0];

    $date de vuelta;
}


mi $cob_date = &_getCOB ();
mi $cob_date1 = ensamblan “: ”, Ahora ();

impresión $cob_date, “\ t”, $cob_date1,” \ n ";
Otras soluciones  
 
programming4us programming4us