# Pubs Text File ###################
# Open pubs text file for reading only (r). $filePtr points to the first line.
$filePtr = fopen($index_file, "r");
# feof() function determines if the end of file has been reached.
# Print each line of the file until the end of the file.
# 0: pub number, 1: pub name, 2: author, 3: keywords, 4: year, 5: program number, 6: program area, 7: hyperlink (true/false), 8: media type, 9: pages, 10: extranet (true/false), 11: email (true/false), 12: month, 13: center, 14: quantity, 15: funding source
while (!feof($filePtr)) {
$fileLine = fgets($filePtr, 4096);
$elementsArray = explode("`", $fileLine);
if ( $elementsArray[0] == $var) {
$p_num = $elementsArray[0];
$p_name = $elementsArray[1];
$p_auth = $elementsArray[2];
$p_kw = $elementsArray[3];
$p_year = $elementsArray[4];
$p_area = $elementsArray[6];
$p_hyperlink = $elementsArray[7];
$p_media = $elementsArray[8];
$p_pages = $elementsArray[9];
$p_email = $elementsArray[11];
$p_month = $elementsArray[12];
$p_center = $elementsArray[13];
$cnt++;
} #if
} #while
# Close the text file.
fclose($filePtr);
# Print the static head html to the browser
#include($head);
# Print the info to the browser.
print '' . "\n";
?>