You can also use it like the first form in a secure way with a twist:

sub wryte
{
    local $~ = shift;
    write;
    }

wryte "MY_TOP";
[download]