Borsenkow Andrej <[EMAIL PROTECTED]> writes:
> > 1) Getting the list of available updates
>
> urpmf --name
Hum. Dunno if urpmf/urpmq does the job, but the following script
does:
-=-=---=-=---=-=---=-=---=-=---=-=---=-=---=-=--
use urpm;
use URPM;
$urpm = new urpm;
$urpm->configure();
$db = URPM::DB::open;
$db->traverse(sub {
my ($p) = @_;
foreach (keys %{$urpm->{provides}{$p->name} || {}}) {
my $pkg = $urpm->{depslist}[$_];
$pkg->name eq $p->name or next;
$pkg->compare_pkg($p) <= 0 and next;
my ($name, $version, $release, $arch) = $pkg->fullname;
print "$name $version $release $arch\n";
}
});
-=-=---=-=---=-=---=-=---=-=---=-=---=-=---=-=--
--
Guillaume Cottenceau - http://people.mandrakesoft.com/~gc/
