oops that should be while (not ($_ =~ m/\(//)) { # match the first parenthesis and not: while (not ($_ =~ m/)//)) { # match last parenthesis
My apologies, Dan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]