Skip to content
Browse files

pass in log filename

  • Loading branch information...
1 parent b862bfd commit 40980ec74208eb0110720a37a207f8dfe890295a @lukec lukec committed Apr 13, 2010
Showing with 2 additions and 1 deletion.
  1. +2 −1 bin/vhs-analytics
View
3 bin/vhs-analytics
@@ -7,7 +7,8 @@ use Text::Graph;
use Text::Graph::DataSet;
#open(my $fh, "/var/log/vhs.log.0");
-open(my $fh, "/var/log/vhs.log");
+my $log_file = shift || '/var/log/vhs.log';
+open(my $fh, $log_file) or die;
my $last_close = 0;
my $last_flush = 0;

0 comments on commit 40980ec

Please sign in to comment.
Something went wrong with that request. Please try again.