9 |
|
|
10 |
my $bib = new Bibulus::LaTeX; |
my $bib = new Bibulus::LaTeX; |
11 |
$bib->inlinecrossref(2); # standard for BibTeX |
$bib->inlinecrossref(2); # standard for BibTeX |
12 |
$bib->setmainlang('da'); |
$bib->setmainlang('en'); # default language for BibTeX |
13 |
|
|
14 |
# Parse command line: |
# Parse command line: |
15 |
foreach (@ARGV) { |
foreach (@ARGV) { |
16 |
if (/^--?min-crossrefs=(\d+)$/) { |
if (/^--?min-crossrefs=(\d+)$/) { |
17 |
$bib->inlinecrossref($1); |
$bib->inlinecrossref($1); |
18 |
|
} elsif (/^--?language=(\w+)$/) { |
19 |
|
$bib->setmainlang($1); |
20 |
} elsif (/^--?terse$/) { |
} elsif (/^--?terse$/) { |
21 |
$bib->verbose(0); |
$bib->verbose(0); |
22 |
$terse = 1; |
$terse = 1; |
55 |
-help display this help and exit |
-help display this help and exit |
56 |
-version output version information and exit |
-version output version information and exit |
57 |
-debug print debugging information while running |
-debug print debugging information while running |
58 |
|
-language=LN output bibliography in language LN (two-letter ISO code) |
59 |
|
|
60 |
Email bug reports to twid\@cpan.org |
Email bug reports to twid\@cpan.org |
61 |
EOT; |
EOT; |
83 |
-help display this help and exit |
-help display this help and exit |
84 |
-version output version information and exit |
-version output version information and exit |
85 |
-debug print debugging information while running |
-debug print debugging information while running |
86 |
|
-language=LN output bibliography in language LN (two-letter ISO code) |
87 |
|
|
88 |
=head1 BUGS |
=head1 BUGS |
89 |
|
|