$fcount=()=$data=~m/YOUR REGEX HERE/xig