Select Code to Download

Std_English,A2,B3|Std_Arts,A2,B6|Std_Cultural,A1,E8

$input =~ /^
            (?:                 # Non-capturing parens
...
            )                   # End capture
            .*                  # Rest of line (okay to be greedy here
+)
         /ix;