Your code should look like this:

while (<'FILE'>) {
  $gline = $_;
  print $gline;
}
[download]

This should fix your problem. The perl parser will not care what the content of the lines you are reading in, and shold never mangle them.

-monkfish (The fishy monk)