Also, this will break in Perl 6, where $_ is lexically scoped rather than global. (There are other ways to get the same effect in Perl 6, but I don't know if the translator will recognize what you have there as something that needs translating.)