[FoLUG] problema con perl

[chris osu]

Ho un array che contiene degli elementi che sono stringe, alcune delle quali iniziano con <
  Volevo cancellare tutti gli elementi che iniziavano con <
  Ma qualcosa non quadra. Non credo che sia l'espressione regolare.
  Se qualcuno, sa il motivo...
  Grazie
   
   
   
  foreach $_(@string2) {
    if ($_ = ~ /^<(.*)/){
      delete $string2{$_};
      }
   
}
   print "@string2";
 

 		
---------------------------------
Stay in the know. Pulse on the new Yahoo.com.  Check it out.