Fix some whitespace.
Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
parent
2ad99c20bc
commit
dfc2b81c37
|
@ -4,12 +4,12 @@
|
||||||
#
|
#
|
||||||
# This script will log headers and other data to a database
|
# This script will log headers and other data to a database
|
||||||
# for further analysis by parsing a feed from INN.
|
# for further analysis by parsing a feed from INN.
|
||||||
#
|
#
|
||||||
# It is part of the NewsStats package.
|
# It is part of the NewsStats package.
|
||||||
#
|
#
|
||||||
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
||||||
#
|
#
|
||||||
# It can be redistributed and/or modified under the same terms under
|
# It can be redistributed and/or modified under the same terms under
|
||||||
# which Perl itself is published.
|
# which Perl itself is published.
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -4,12 +4,12 @@
|
||||||
#
|
#
|
||||||
# This script will gather statistical information from a database
|
# This script will gather statistical information from a database
|
||||||
# containing headers and other information from a INN feed.
|
# containing headers and other information from a INN feed.
|
||||||
#
|
#
|
||||||
# It is part of the NewsStats package.
|
# It is part of the NewsStats package.
|
||||||
#
|
#
|
||||||
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
||||||
#
|
#
|
||||||
# It can be redistributed and/or modified under the same terms under
|
# It can be redistributed and/or modified under the same terms under
|
||||||
# which Perl itself is published.
|
# which Perl itself is published.
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
@ -292,7 +292,7 @@ conjunction with B<--test> ... everything else seems a bit pointless.
|
||||||
|
|
||||||
Set processing period to a single month in YYYY-MM format or to a time
|
Set processing period to a single month in YYYY-MM format or to a time
|
||||||
period between two month in YYYY-MM:YYYY-MM format (two month, separated
|
period between two month in YYYY-MM:YYYY-MM format (two month, separated
|
||||||
by a colon).
|
by a colon).
|
||||||
|
|
||||||
=item B<-s>, B<--stats> I<type>
|
=item B<-s>, B<--stats> I<type>
|
||||||
|
|
||||||
|
|
|
@ -4,12 +4,12 @@
|
||||||
#
|
#
|
||||||
# This script will get statistical data on newgroup usage
|
# This script will get statistical data on newgroup usage
|
||||||
# from a database.
|
# from a database.
|
||||||
#
|
#
|
||||||
# It is part of the NewsStats package.
|
# It is part of the NewsStats package.
|
||||||
#
|
#
|
||||||
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
||||||
#
|
#
|
||||||
# It can be redistributed and/or modified under the same terms under
|
# It can be redistributed and/or modified under the same terms under
|
||||||
# which Perl itself is published.
|
# which Perl itself is published.
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
@ -347,7 +347,7 @@ Print out version and copyright information and exit.
|
||||||
|
|
||||||
Print this man page and exit.
|
Print this man page and exit.
|
||||||
|
|
||||||
=item B<-m>, B<--month> I<YYYY-MM[:YYYY-MM]|all>
|
=item B<-m>, B<--month> I<YYYY-MM[:YYYY-MM]|all>
|
||||||
|
|
||||||
Set processing period to a single month in YYYY-MM format or to a time
|
Set processing period to a single month in YYYY-MM format or to a time
|
||||||
period between two month in YYYY-MM:YYYY-MM format (two month, separated
|
period between two month in YYYY-MM:YYYY-MM format (two month, separated
|
||||||
|
|
|
@ -3,12 +3,12 @@
|
||||||
# install.pl
|
# install.pl
|
||||||
#
|
#
|
||||||
# This script will create database tables as necessary.
|
# This script will create database tables as necessary.
|
||||||
#
|
#
|
||||||
# It is part of the NewsStats package.
|
# It is part of the NewsStats package.
|
||||||
#
|
#
|
||||||
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
# Copyright (c) 2010-2013 Thomas Hochstein <thh@inter.net>
|
||||||
#
|
#
|
||||||
# It can be redistributed and/or modified under the same terms under
|
# It can be redistributed and/or modified under the same terms under
|
||||||
# which Perl itself is published.
|
# which Perl itself is published.
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
@ -185,7 +185,7 @@ if (!$OptUpdate) {
|
||||||
&CreateTable($Table);
|
&CreateTable($Table);
|
||||||
};
|
};
|
||||||
print "Database table generation done.\n";
|
print "Database table generation done.\n";
|
||||||
|
|
||||||
# Display install instructions
|
# Display install instructions
|
||||||
print $Install;
|
print $Install;
|
||||||
} else {
|
} else {
|
||||||
|
|
Loading…
Reference in a new issue