for (@array) { s/0;nodata/1;$secondary/gi if /$email/ }