$_ = "master442arb_ba";
$_ =~ /master(.*)arb_ba/;
$action = "m$1a_ba";
s/$_/$action/;
print $_;