my $str = 'test number X';
my @numbers = (2, 3, 4);

@newArray = map { ($_ = $str) =~ s/X/$_/ } @numbers;