Data
#1
Posted 26/01/2006, 15:05
tenho a seguinte data
03/11/2005
como eu faço para acrescentar por exemplo 30 dias a esta data??
eu consigo acrescentar sobre a data atual usando o time(que é um numero confuso para kct)
alguem sabe como fazer isso
e tbm como contar a diferença de dias entre duas datas
exemplo
03/11/2005
26/01/2006 == 84 dias
alguem sabe como fazer isso???
ja fiz farios codes, mais funciona pela metade
abraços
- LarPhozyHah likes this
#2
Posted 26/01/2006, 15:58
module:
http://search.cpan.o...lib/DateTime.pm
calculos:
http://datetime.perl...pleCalculations
print join'',(reverse map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;
E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.
#3
Posted 26/01/2006, 16:02
$data = '03/11/2005'; $adiciona = 90; ($dia,$mes,$ano) = split (/\//,$data); $dia = $dia + $adiciona; if ($dia > 29 && $dia < 60) { $dia = $dia - 30; $mes = $mes +1; if ($mes > 12) { $mes = '01'; } } if ($dia > 59 && $dia < 90) { $dia = $dia - 60; $mes = $mes +2; if ($mes > 12) { $mes = '02'; } } if ($dia > 89 && $dia < 120) { $dia = $dia - 90; $mes = $mes +3; if ($mes > 12) { $mes = '03'; } } $data2 = "$dia/$mes/$ano"; print "$data2\n";
Edição feita por: prix, 26/01/2006, 16:06.
print join'',(reverse map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;
E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.
#4
Posted 26/01/2006, 23:48
1º: Ele pega sua data, converte sem segundos (ai fica esse número confuso q vc disse).
2º: Com esse número confuso, você pega o tempo em segundos atual e subtrai o número da data futura.
3º: Com o resultado da subtração, você soma à data atual.
4º: Só fazer a formatação do tempo... como sempre fez antes...
*não testei essa lógica, mas parece q funciona...
Site >> joaogabriel.org
CGiClube.net >> http://www.cgiclube.net
Vitória Perl Mongers >> http://vitoria.pm.org
#5
Posted 27/01/2006, 00:23
print join'',(reverse map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;
E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.
#6
Posted 28/01/2006, 10:35
se eu conseguice isso, eu ja conseguiria sucegado colocar mais 90 dias (por exemplo)
alguem sabe como fazer isso???
JGCL: como tranformo a data em segundos que vc falou?
abraços
#7
Posted 28/01/2006, 11:45
$time = timegm($seg, $min, $hr, $dia, $mes-1, $ano-1900);
Site >> joaogabriel.org
CGiClube.net >> http://www.cgiclube.net
Vitória Perl Mongers >> http://vitoria.pm.org
#8
Posted 21/09/2017, 11:59
Amoxicillin Usual Dose Cialas Professional For Sale Zithromax And Your Period
Keflex Abscessed Tooth <a href=http://cialtobuy.com>cialis</a> Propecia Im Ausland Kaufen
Levitra Usa cialis Free Samples Of Cialis
Propecia Increase Chest Hair Malegra Fxt Review
Real Propecia Results Thinning Hair <a href=http://cialtobuy.com>cialis</a> Kamagra When To Take
Get Zentel cialis buy online Definicion De Propecia
Dog Side Effects Of Amoxicillin
Topical Amoxicillin For Acne <a href=http://cialtobuy.com>cialis buy online</a> Does Amoxicillin Make You Sweat
Keflex For Uti Emedicine cialis online Canadian Meds Paypal
Plus Fort Que Le Viagra Levitra Online Viagra Et Previscan
Differenza Viagra Cialis Levitra <a href=http://cialtobuy.com>online pharmacy</a> Cialis 5 Mg Cost
#10
Posted 03/10/2017, 18:02
Reputable Suppliers Of Generic Viagra Viagra Without Perscriptions Acheter Du Cialis Ligne viagra Priligy Cuanto Dura Online Inhalers No Prescription Usa Amoxicillin One Day Over Expire Date
Elidel Amoxicillin Dosage Amounts Donde Comprar Viagra Sin Receta En Barcelona levitra discount Discount Hydrochlorothiazide Find Medication Amex
Amoxicillin Pregnancy Safe viagra Cialis 5mg Achat Vipps Pharmacy Selling Viagra Cialis Brausetabletten
Viagra Generika Test Legally isotretinoin from canada cod accepted pharmacy viagra online pharmacy Fluoxetine Next Day Overseas No Prior Script
Cialis Effetti Gravidanza viagra Brand Name Cialis 500 Amoxil Durer Plus Longtemps
#11
Posted 07/10/2017, 22:40
#12
Posted 08/10/2017, 18:08
Proventil Amoxicillin And Dairy Products viagra prescription Kamagra Prix En Pharmacie Clindamycin Keflex Propecia Y Cerveza
#13
Posted 25/10/2017, 00:12
Cialis 10mg Gunstig viagra Gelly Kamagra Viagra Packungsbeilage Vendita Cialis In Contrassegno
Cialis Preis Tadalafil Cialis Zerkauen Stomach Upset With Amoxicillin online pharmacy Vendita Cialis Originale
#15
Posted 04/11/2017, 03:42
isotretinoin can i purchase Cialis Homme Ordering Propecia Online online pharmacy Keflex W Insurance
Zithromax For Uterine Infection viagra Acheter Cialis Pharmacie Ligne
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)