How do you use atomic groups and possessive quantifiers with a short example?

In Perl, atomic groups and possessive quantifiers can improve performance by preventing backtracking. Atomic groups are defined with the syntax `(?>...)` and possessive quantifiers by appending a `+`, `*`, or `?` with a `+` sign, like `*+` or `?+`. Here’s a simple example:


        # Perl example using atomic groups and possessive quantifiers
        my $string = 'abcabcabc';
        
        # Using a possessive quantifier
        if ($string =~ /a.+?c+/) {
            print "Matched with possessive quantifier.\n";
        }
        
        # Using an atomic group
        if ($string =~ /a(?>bc)+/) {
            print "Matched with atomic group.\n";
        }