version 1.1, 2006/10/03 00:34:59
|
version 1.3, 2006/10/04 19:47:33
|
Line 218 sub check_with_rug {
|
Line 218 sub check_with_rug {
|
chomp(@output); |
chomp(@output); |
my @clean_output; |
my @clean_output; |
foreach my $line (@output) { |
foreach my $line (@output) { |
if ($line eq 'Waking up ZMD...' || $line eq 'Done') { |
if ($line =~ /^Waking\sup\sZMD\.\.\./) { |
next; |
next; |
} |
} elsif ($line eq 'Done') { |
if ($line eq 'No updates are available.') { |
next; |
|
} elsif ($line eq '') { |
|
next; |
|
} elsif ($line eq 'The following packages will be installed:') { |
|
next; |
|
} elsif ($line eq 'Resolving Dependencies...') { |
|
next; |
|
} elsif ($line eq 'Transaction...') { |
|
last; |
|
} elsif ($line eq 'No updates are available.') { |
last; |
last; |
} else { |
} else { |
push(@clean_output,$line); |
push(@clean_output,$line); |