136c136
< 	    \ || synid =~ '^perl\(Sub\|BEGINEND\|If\)Fold'
---
> 	    \ || synid =~ '^perl\(Sub\|BEGINEND\|If\|Block\)Fold'
151c151
< 	    \ || synid =~ '^perl\(Sub\|BEGINEND\|If\)Fold'
---
> 	    \ || synid =~ '^perl\(Sub\|BEGINEND\|If\|Block\)Fold'