Pergunta : Um problema do módulo da data do Perl

Olá!, o

I pode recuperar a data de hoje using a data:: Módulo do Calc. Pode você pls ajudar a respeito de como eu posso recuperar minutos de hoje da hora e tempo dos segundos using o mesmo módulo em um outro variável dizem $cob_date1? class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
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:
data notpretty do >use " do class= " de " codeSnippet836742 do id= do
class= do

Resposta : Um problema do módulo da data do Perl

Para simplificar e expandir em o que você tem, você pode fazer este…
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

data do uso:: Qw do Calc (: tudo);

meus @mon = qw (janeiro fevereiro março abril pode junho julho agosto setembro outubro novembro dezembro);

_getCOB secundário {

    meu @date = hoje ();

    # comentado para fora desde que não usado
    #my $dow = Day_of_Week (@date);

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

    $date do retorno;
}


meu $cob_date = &_getCOB ();
meu $cob_date1 = juntam-se “: ”, Agora ();

cópia $cob_date, “\ t”, $cob_date1,” \ n ";
Outras soluções  
 
programming4us programming4us