in reply to Re: hoping to use PPM::InstallPackage
in thread hoping to use PPM::InstallPackage
I don't understand all the nuances yet. Not by a long shot.use strict; use PPM::UI; my $target_list = PPM::UI::target_list(); my $rep_list = PPM::UI::repository_list(); my $list = PPM::UI::search( $rep_list->result, $target_list->result->[ +0], "Win32-FileOp", 1 ); my @arr = $list->{ "result" }; my $piece; foreach $piece ( @arr ) { my $piece0; foreach $piece0 ( @$piece) { print $piece0->{ "reps" }->[0]->{ "url_base" }; print "\n"; } }
|
|---|