+use Getopt::Long;
+
+my $help = 0;
+my $verbose = 0;
+my $output_dir;
+
+GetOptions( 'h|help' => \$help,
+ 'v|verbose' => \$verbose,
+ 'o|out:s' => \$output_dir,
+ );
+my $usage = << 'ENDUSAGE';
+
+This script calculates and charges overdue fines
+to patron accounts. If the Koha System Preference
+'finesMode' is set to 'production', the fines are charged
+to the patron accounts. If set to 'test', the fines are
+calculated but not applied.
+
+This script has the following parameters :
+ -h --help: this message
+ -o --out: ouput directory for logs (defaults to env or /tmp if !exist)
+ -v --verbose
+
+ENDUSAGE
+
+die $usage if $help;