my $regex = qr / "([^"]+)" | '([^']+)' | (.+) /x;