#!/usr/bin/perl use strict; my $version = "1.01"; my $o = '*'; use Getopt::Std; our($opt_s, $opt_p, $opt_f, $opt_n, $opt_i, $opt_b, $opt_g, $opt_2, $opt_5); getopts('s:pfnibg25'); if ($opt_s) { $o = $opt_s; } my $css = ""; my $depth = 0; my $section = 1; my $note = 1; my $abstract = 0; my $current; my $tag = "content000"; my $back = "white"; my $fore = "black"; my $subtitle = ''; my $affilation = ''; my $closing = ""; my $opening = '