$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;