Perl grep = fat?

I present for your perusal this webpage which sez summat about ze Perl grep function. Also, it comes with an advert for reducing ze tummy. Why? Implicit assumption that anyone interested in perl will be pasty faced, eating Doritos and fat?