From a6f6c1525b6f8e564456b9eb6961bf69eebd735e Mon Sep 17 00:00:00 2001 From: J Pipkin Date: Thu, 3 Jan 2013 01:34:14 -0600 Subject: store the list of available updates in /var/log/sbocheck.log --- sbocheck | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/sbocheck b/sbocheck index 424fec0..73bf7c1 100755 --- a/sbocheck +++ b/sbocheck @@ -64,6 +64,13 @@ sub print_output($) { $tab->configure(tab => '\s'); my $output = $tab->format(@$listing); say "\n". $output; + # save a log of available updates + my $logfile = '/var/log/sbocheck.log'; + unlink $logfile if -f $logfile; + my $log_fh = open_fh($logfile, '>'); + print {$log_fh} $output; + close $log_fh; + say "A copy of the above result is kept in $logfile\n"; } else { say "\nNo updates available."; } -- cgit v1.2.3