title: Perl glob and filehandle problems
body: <p>Ok, I have a bit of an issue here. I realize that I don't need to set a $handle to *::HTML to get this snippet to work, however this code is taken out of context from its use and I do in fact need this to work with the $handle. The output I am receiving is below the snippet however the output I want is for the file.html to contain "what\nsometext1\nsometext2\n".    </p>
  
  <pre><code>open(HTML, "&gt;file.html");
  $handle = \*::HTML;
  print $handle "what\n";
  
  open(READ, "&lt; somefile.txt"); #somefile.txt contains sometext1\nsometext2\n
  while(&lt;READ&gt;)
  {
      print $handle;
  }
  close READ;
  close HTML;
  </code></pre>
  
  <p>file.html is left with the output "what" and GLOB(0x6278b0)GLOB(0x6278b0) is printed to terminal window.</p>