I hope I did this right.
Thanks,
Ken
main::(-e:1): 1
DB<1> x $a = new URPM
0 URPM=HASH(0x831bef8)
'depslist' => ARRAY(0x831bf4c)
empty array
'provides' => HASH(0x831bd84)
empty hash
DB<2> x $a->parse_rpm("libjs-1.1-8mdk.athlon.rpm");
0 0
1 0
DB<3> x $a->{depslist}[0]->is_arch_compat;
0 0
DB<4> x $a->{depslist}[0]->arch;
0 'athlon'
Fran�ois Pons wrote:
>Can you do the following :
>
>perl -MURPM -de1
>DB<1> x $a = new URPM;
>DB<2> x $a->parse_rpm("any_rpm.athlon.rpm");
>DB<3> x $a->{depslist}[0]->is_arch_compat;
>
>And send me the result of the last command (note DB<n> is perl debuger prompt),
>including the result of this command too :
>DB<4> x $a->{depslist}[0]->arch;
>
>Thanks,
>Fran�ois.
>
>
>
>
--
Kenton A. Groombridge
[EMAIL PROTECTED]
http://home.coastalnow.net/~kgroombr/
