Можно ли в коде разбить регулярное выражение Perl на несколько строк?

Мне просто интересно, могу ли я разбить длинное регулярное выражение, которое есть в моем коде Perl, на несколько строк? Я просто хочу, чтобы удобочитаемость и компактность оставались неизменными для всех, кто может просмотреть мой код после его завершения. Я ищу что-то похожее на то, как строки разбиваются на несколько строк в Perl. Например:

print "This is a string that is ". #1st line
      "very long, so it is on 2 lines!"; #2nd line
# prints = "This is a string that is very long, so it is on 2 lines!" 

Я не уверен, как это сделать с помощью регулярного выражения, поскольку оно не использует кавычки. Если я нажму Enter, я предполагаю, что в моем регулярном выражении появится новый символ строки, что сделает его ошибочным. Я хотел бы сделать что-то вроде:

if($variable_1 = /abcde_abcde_abdcae_adafdf_      #1st regex line
                 abscd_casdf_asdfd_....asdfaf/){ #regex continued
    # do something
} # regex looking for pattern = abcde_abcde_abdcae_adafdf_abscd_casdf_asdfd_....asdfaf