def diff(s1, fm, s2)
  count = 0
  for i in 0...s2.length do
    count += 1 if s1[fm+i] != s2[i]
  end
  return count
end

G = "good";    GLEN = G.length
P = "problem"; PLEN = P.length

gets
while line = gets do
  s = line.chomp
  slen = s.length
  min = slen
  h = {}
  for i in 0..(slen - GLEN - PLEN) do
    c1 = diff(s, i, G)
    for j in (i + GLEN)..(slen - PLEN) do
      c2 = h[j]
      unless c2 then
        c2 = diff(s, j, P)
        h[j] = c2
      end
      min = c1 + c2 if c1 + c2 < min
    end
  end
  puts min
end