whether following block is valid
This is valid as long as it works as you have expected. perl is very intelligent enough to understand this. what is the use of doing like that ?