Thread in listbox nach pattern suchen (8 answers)
Opened by hudo at 2003-12-03 19:05

Strat
 2003-12-03 19:29
#46298 #46298
User since
2003-08-04
5246 Artikel
ModeratorIn
[Homepage] [default_avatar]
Wenn deine Listbox $lb heisst, koennte man das folgendermaszen machen:
Code: (dl )
1
2
3
4
5
6
7
8
my $pattern = qr(test);

my @items = $lb->get(0, 'end');
for(my $i=$#items;$i>0;$i--){
  if ($items[$i] !~ /$pattern/) {
    $lb->delete($i);
  }
}

nicht getestet, aber vielleicht funktionierts...\n\n

<!--EDIT|Strat|1070472609-->
perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View full thread in listbox nach pattern suchen