my $matched = join ' ', $str =~ /\ba\w+\b/g;