print without arguments defaults to operating on $_ and you could also chomp all of your lines in one go. If you don't mind destroying the array you could do this (using defined to cope with blank lines)
chomp( my @yahoo = <DATA> );
print while defined( $_ = shift @yahoo );