my @types = (  $variable  =~  /(ds\[[a-z]*\]\.type\s+=\s+[^\n]+)/g  );