jesuashok has asked for the wisdom of the Perl Monks concerning the following question:
Hi all
How to simplify that one.
$input= "200604131145" #( yyyymmddhhmi)
I would like to add 15 with the $input
I should get the output as $output = "200604130200"
I would like to get this done in simpler way.
I am already advised by the perlmonks that using perl module will make
the work very simple.
But people who are sitting above me, strictly told that I should not use modules.
Please bear with me.
Existing code is given in the above lines.($YY, $MM, $DD, $hh, $mm) = ($dtstamp =~ /(\d\d\d\d)(\d\d)(\d\d)(\d\d) +(\d\d)/); $period1 =sprintf("%02d/%02d/%04d %02d:%02d", $MM, $DD, $YY, $hh, $mm+15); $period2 =sprintf("%02d/%02d/%04d %02d:%02d", $MM, $DD, $YY, $hhm2, $hm2-$hhm2*60); $period3 =sprintf("%02d/%02d/%04d %02d:%02d", $MM, $DD, $YY, $hh, $mm); $period4 =sprintf("%02d/%02d/%04d %02d:%02d", $MM, $DD, $YY, $hhm2, $hm2-(($hhm2*60)-15));
How to simplify that one.
"Keep pouring your ideas"
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: getting Date calculation in simpler way
by dragonchild (Archbishop) on Apr 13, 2006 at 13:03 UTC | |
Re: getting Date calculation in simpler way
by davidrw (Prior) on Apr 13, 2006 at 13:17 UTC | |
Re: getting Date calculation in simpler way
by johngg (Canon) on Apr 13, 2006 at 14:25 UTC | |
Re: getting Date calculation in simpler way
by ff (Hermit) on Apr 13, 2006 at 13:35 UTC | |
Re: getting Date calculation in simpler way
by salva (Canon) on Apr 13, 2006 at 14:39 UTC | |
Re: getting Date calculation in simpler way
by ambrus (Abbot) on Apr 13, 2006 at 17:18 UTC |
Back to
Seekers of Perl Wisdom