#!/usr/bin/perl

my @buildno = ("I need to capture the word beginning with CSR1.1.2.BOI46 contained in the array within a string.");
do {$_ = $1 if /(?:^|\s)(CSR\S*)/} foreach @buildno;
 
print $buildno[0];