commit 82b8589fe7e3ff7468b9c3efc9c54b896d845192
parent e3b9e8302f0ab0a1b38124892d1885957f6d2134
Author: Kyle Milz <kyle@getaddrinfo.net>
Date: Sun, 15 Mar 2015 17:46:44 -0600
gen_index: simplify
Diffstat:
M | gen_index | | | 33 | +++++++++++++-------------------- |
1 file changed, 13 insertions(+), 20 deletions(-)
diff --git a/gen_index b/gen_index
@@ -19,44 +19,37 @@ my $cfg = get_config();
my $dbh = get_dbh($cfg->{"general"});
my $http_cfg = $cfg->{"http"};
-my $output = $http_cfg->{"chroot"} . $http_cfg->{"htdocs"};
-my $include = $output;
-# my $include = "/home/kyle/src/pricechart/html";
-
-print "info: including from: $include\n" if ($args{v});
-print "info: outputting to: $output\n" if ($args{v});
+my $work_dir = $http_cfg->{"chroot"} . $http_cfg->{"htdocs"};
+print "info: work dir: $work_dir\n" if ($args{v});
my $config = {
INTERPOLATE => 1,
POST_CHOMP => 1,
EVAL_PERL => 1,
- INCLUDE_PATH => $include,
- OUTPUT_PATH => $output
+ INCLUDE_PATH => $work_dir,
+ OUTPUT_PATH => $work_dir
};
my $template = Template->new($config);
my $query = "select count(distinct manufacturer) from products";
-my ($manufacturers) = $dbh->selectrow_array($query);
-print "info: $manufacturers manufacturers\n" if ($args{v});
+my ($m) = $dbh->selectrow_array($query);
$query = "select count(part_num) from products";
-my ($products) = $dbh->selectrow_array($query);
-print "info: $products products\n" if ($args{v});
+my ($p) = $dbh->selectrow_array($query);
$query = "select count(distinct vendor) from prices";
-my ($vendors) = $dbh->selectrow_array($query);
-print "info: $vendors vendors\n" if ($args{v});
+my ($v) = $dbh->selectrow_array($query);
my $time = time - (7 * 24 * 60 * 60);
$query = "select count(part_num) from products where first_seen > ?";
-my ($new_products) = $dbh->selectrow_array($query, undef, $time);
-print "info: $new_products new products (1 week)\n" if ($args{v});
+my ($n) = $dbh->selectrow_array($query, undef, $time);
+print "info: $m manufacturers, $p products ($n new), $v vendors\n" if ($args{v});
my $vars = {
- num_vendors => $vendors,
- num_manufacturers => $manufacturers,
- num_products => $products,
- new_products => $new_products
+ num_vendors => $v,
+ num_manufacturers => $m,
+ num_products => $p,
+ new_products => $n
};
$template->process("index.tt2", $vars, "index.html")