view release on metacpan or  search on metacpan

lib/Alien/Packages/RpmDB.pm  view on Meta::CPAN

=head2 new

Instantiates a new Alien::Packages::RpmDB object and initializes a
connection to the rpm database.

=cut

sub new
{
    my ( $class, @options ) = @_;
    my $self = $class->SUPER::new(@options);

    my %h;
    tie %h, "RPM::Database" or croak $RPM::err;
    $self->{rpmdb} = \%h unless ($RPM::err);

    return $self;
}

=head2 pkgtype