comment on

I'll suggest this instead

my $tp = Time::Piece->strptime($1, DATE_FORMAT);
# out the replacement line
print "tp is: $tp\n"; # we check $tp values here, just for the record

($tp+ONE_MINUTE*2*$n)->strftime(DATE_FORMAT);
[download]

mmmh... this second line needs a var. Try something like this (untested):

$tp = $tp+ONE_MINUTE*2*$n;
print "tp is now: $tp\n"; # we check $tp again after the changes

$lines[1] =~ 's{:20140924105028(\d+)}'{$tp}e;
[download]

I see also a problem here with 's{}'{}e. Delete the "'" --> s{}{}e

In reply to Re^4: Dera Monks, Have create multiple file from one file now I want to match a pattern in each file at the same time do the replacement with adding one to the match pattern. by pvaldes
in thread Dera Monks, Have create multiple file from one file now I want to match a pattern in each file at the same time do the replacement with adding one to the match pattern. by hemantjsr

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


XP is just a number
	PerlMonks