$_='[Microsoft][ODBC SQL Server Driver][SQL Server][0122]USAGE: InvokeStoredProcedure [param1], [param2], [param3], [param3]'; my ($one, $two) = /((?:.*?\]){3})(.*)/; print "<$one>\n<$two>\n";