help => 0,
man => 0,
log_only => 0,
+ tex_only => 0,
);
GetOptions(\%options,
'time_interval|min-time-interval|T=s',
'hourly_fee|hourly-fee|f=s',
'log_only|log-only',
+ 'tex_only|tex-only',
'debug|d+','help|h|?','man|m');
pod2usage() if $options{help};
exit 0;
}
+if ($options{tex_only}) {
+ print $tex_invoice;
+ exit 0;
+}
+
+
my $invoice_date = strftime('%Y_%m_%d',localtime($last_date));
my $invoice_dir = "invoice_$invoice_date";