Help for this page
create table foo ( somevar1 sometype, ... somevar4 sometype(20), somevar5 sometype(20) null, somevar6 sometype(10))
$str =~ s{ (create\s+table\s+\w+\s*\() # "create table foo (", save as $1 ... }gex; # Output: create table foo (somevar6 sometype(10) NOT NULL)