$count = () = $data =~ m/and/g;