my %count;
    $count {$1} ++ while $content =~ /\Q$left_string\E(.*)\Q$right_string\E/g;