Документ взят из кэша поисковой машины. Адрес оригинального документа : http://hea.iki.rssi.ru/Z-90/z90-bibtex.pl~
Дата изменения: Wed May 5 14:20:08 2004
Дата индексирования: Mon Oct 1 20:51:11 2012
Кодировка:

#!/usr/bin/perl

require "bp.pl";

&bib'format("auto");

$bib_file="/tmp/z90-form.bib";

print "Content-Type: text/html\n\n";

next unless &bib'open($bib_file);
$totrecs = 0;
print "

\n";

  while ($record = &bib'read($bib_file) ) {

    print "$record\n";

    $totrecs++;

  }

  &bib'close($file);

  #print "$file has $totrecs records.\n";

print "

\n";