Re: removing carriage returns

[Parham]

also (it's easier to understand, but you adding more code), just an alternative...

while ($requests = <REQUESTS>) {
  chomp $requests; #remove any endline characters
  if ($requests ne "") { #if all endline characters are wiped, check f
+or nothingness
    print MAIL "$requests\n";
  }
}

EDIT. RMGir got me good. Sorry for the mistake. (didn't put my newlines back in)

[RMGir]

Don't forget to put the newline back in, though...

while ($requests = <REQUESTS>) {
  chomp $requests; #remove any endline characters

  #if all endline characters are wiped, 
  #check for nothingness
  if ($requests ne "") {
     # add newline for lines we're printing 
     print MAIL "$requests\n"; 
  }
}


--
Mike