One small but worthwhile modification would be to open an errors file and ouput non matching records to it. You could then tune or post process these.
open ERRS, ">error.log" or die $!; while( ... ) { my ( ... ) =~ m/ ... /x; if ( $authors ) { # output as desired } else { print ERRS "$_\n"; } } close ERRS;
cheers
tachyon
In reply to Re^2: parsing a bibliography
by tachyon
in thread parsing a bibliography
by patrickrock
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |