@parts = $string =~ m{"[^"]*"|\S+}g;