$path=~/^\s*([\w-]+)  # elt
                 \s*\[\s*\@      #    [@
                 ([\w-]+)        #      att                     $1
                 \s*=\s*(["'])   #         = "          (or ',) $2
                 (.*?)           #            value             $3
                 \3\]\s*$/gx)    #                 "]   (or ')