while doesn't iterate $_ over the expression. while (<>) is special, it's an abbreviation of

while (defined($_ = <>))
[download]

By using anything more than the diamond operator (or an assignment of it), the magic is gone. So, reverse <DATA> reverses DATA, but doesn't assign anything to $_.

See also I/O Operators in perlop.