perl SimpleList TreeView / kako do podataka ispod selektovanog reda

Imam neki program koji zelim malo prepraviti.

Na samom pocetku programa:

Code:
...
my $entry3 = $glade->get_widget('entry3');
Gtk2::SimpleList->add_column_type( 'desni',
                   type     => 'Glib::String',
                   renderer => 'Gtk2::CellRendererText',
...
...
...
$tree = $glade->get_widget('treeview1');
$slist = Gtk2::SimpleList->new_from_treeview(     $tree...
...
...

Ovim popunjavam listu:

Code:

while(<RCFILE>) {
...
push @{$slist->{data}}, [@val];
...
}

Ovim dodjem do selektovanog reda:

Code:
my $n = $slist->get_selection->get_selected_rows;
my $row_ref = $slist->get_row_data_from_path($n);
($redbr,$presek,$h,) = @{ $row_ref}[0,3,6];

ali ne zna kako da preuzmem podatke i iz redova koji su ispod selektovanog (treba mi prvi i drugi ispod)?

Nekako sam za sada ovo zaobisao na neki drugi nacin ali to nije to.
Trazim vec par dana po raznim forumima ali koliko god da sam se obradovao perl-u kada sam pre par meseci
poceo da ga ucim kroz ove dorade tog programa kojeg imam, toliko sam se razocarao sto mo se cini da
je slabo zastupljen / na malo dobrih foruma sam naisao i na jos manje primera koji su meni potrebni.
To sto je slabo zastupljen - vidi se i po aktivnosti ovog foruma.

Hvala unapred na pomoci

Forum kao aplikacija na telefonu

Srodne teme