#When you use the construct without assigning, Perl assigns that return value to a variable named $_.
#Many Perl functions use this special variable, called the default variable.
#You can use the print function without specifying a variable at all to print the contents of $_.
while($_ = ) {
print $_;
}