X-Git-Url: https://code.th-h.de/?p=usenet%2Fnewsstats.git;a=blobdiff_plain;f=install%2Finstall.pl;h=e2acf663b60456e92e03b62a45f918d2d7f9cafd;hp=837f09148f48811e493fb0573292f6ae9da41ddf;hb=fd0717a15cb1b36e25a019060d3f40aac9ca9517;hpb=e39d4207a649749f24866d2ee1afeb8ebf3364e2 diff --git a/install/install.pl b/install/install.pl index 837f091..e2acf66 100755 --- a/install/install.pl +++ b/install/install.pl @@ -22,8 +22,6 @@ use warnings; use NewsStats qw(:DEFAULT); -use Cwd; - use DBI; use Getopt::Long qw(GetOptions); Getopt::Long::config ('bundling'); @@ -37,10 +35,6 @@ GetOptions ('u|update=s' => \$OptUpdate, 'h|help' => \&ShowPOD, 'V|version' => \&ShowVersion) or exit 1; -### change working directory to .. (as we're in .../install) -chdir dirname($FullPath).'/..'; -my $Path = cwd(); - ### read configuration print("Reading configuration.\n"); my %Conf = %{ReadConfig($OptConfFile)}; @@ -109,7 +103,7 @@ Things left to do: ## gather statistics for NewsStats newsstats!\\ :!*,de.*\\ - :Tc,WmtfbsPNH,Ac:$Path/feedlog.pl + :Tc,WmtfbsPNH,Ac:$HomePath/bin/feedlog.pl Please @@ -268,8 +262,9 @@ This script will create database tables as necessary and configured. =head2 Configuration -B will read its configuration from F via -Config::Auto. +B will read its configuration from F which should +be present in etc/ via Config::Auto or from a configuration file submitted +by the B<--conffile> option. See L for an overview of possible configuration options.