open (FILE, "<c:/progra~1/apache~1/apache2/htdocs/info.txt") || print "There is no INFO file here $0";
while ( my $line = <FILE> ) {
  ...code here...
}