In this case, since the program is over when the loop completes, that's true. But what if there was more code beyond the end of the loop? If the handle wasn't explicitly closed inside the loop it would remain open.

---
print map { my ($m)=1<<hex($_)&11?' ':'';
$m.=substr('AHJPacehklnorstu',hex($_),1) }
split //,'2fde0abe76c36c914586c';
[download]