do 20
say countstr("*",charin(,,451))/5
end