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

Поисковые слова: carina
#!/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";