Избегайте длинных строк в скриптах Perl

Question

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

Я имею в виду что-то вроде:

my $dbh = DBI->connect("DBI:mysql:database=xxxxxxx;host=xxxxxt", "xxxx", "xxxxxx", \%dbattr) or die ("Bla bla bla bla");

Answer 1

Операторы Perl заканчиваются , разделенными точкой с запятой ;, вам не нужно писать код в одну строку.Ваш пример может быть отформатирован как:

my $dbh = DBI->connect(
  "DBI:mysql:database=xxxxxxx;host=xxxxxt",
  "xxxx",
  "xxxxxx",
  \%dbattr
) or
  die ("Bla bla bla bla");

Или любым другим способом.

Вы также можете взглянуть на такие инструменты, как perltidy , чтобы автоматически украшать ваш код.

Answer 2

Не нужно экранировать.

От perldoc perlsyn :

Perl - это язык свободной формы, вы можете отформатировать и сделать отступ, однакотебе нравится.Пробел в основном служит для разделения токенов, в отличие от языков, таких как Python, где он является важной частью синтаксиса:

my $dbh = 
 DBI->connect("DBI:mysql:database=xxxxxxx;host=xxxxxt", 
 "xxxx", "xxxxxx", \%dbattr
 ) 
 or die ("Bla bla bla bla");