Outre le fait que tu as des caractères étranges (codes couleurs), je pense qu'il faut protéger (échapper) les parenthèses qui ne sont pas capturantes:
Code :
#!/usr/bin/tclsh
regexp {\((.*?)\).*?\((.*?)\).*?\((.*?)\)} "(Question) (cinema) (Qui est l des profondeurs )" a b c d
puts "Full Match: $a"
puts "Sub Match1: $b"
puts "Sub Match2: $c"
puts "Sub Match3: $d"Citation :tclsh test.tcl
Full Match: (Question) (cinema) (Qui est l des profondeurs )
Sub Match1: Question
Sub Match2: cinema
Sub Match3: Qui est l des profondeurs