Daniel McClory schreef: > while(<INPUT>) > { > $_ =~ s/\[*\]//; > $_ =~ s/\(*\)//; > print $_; > } while ( <INPUT> ) { s/\[.*?\]//; s/\(.*?\)//; print; } -- Affijn, Ruud "Gewoon is een tijger."