Select Code to Download

my.my id 
is-relative.to code 
is-relative.to code 
is-mother.to code

( my.my id >= 1 )
( is-relative.to code = 'sister' )
( is-relative.to code = 'brother' )
( is-mother.to code = 'dog' )

my.my id >= 1 )
is-relative.to code = 'sister'
is-relative.to code = 'brother'
is-mother.to code = 'dog'

$text = "05/04/2010 13:09:45 - A - somebody - ( ( my.my id >= 1 ) ) an
+d ( ( is-relative.to code = 'sister' ) or ( is-relative.to code = 'br
+other' ) or ( is-mother.to code = 'dog' ) )";

...
foreach my $i (@list) {
   print "--".$i."--\n";
}