在perl中，它是如何工作的

I am perl beginner, I am reading upon grep function to filter a list. I came across the following program. func