in reply to How to replace the last 2 characters in a string

#!/usr/local/bin/perl

use strict;
use warnings;

my $timestmpa_value = "200504250955";
$timestmpa_value =~ s#\d{2}$#67#;
print $timestmpa_value

[download]

In Section Seekers of Perl Wisdom