避免使用Perl脚本中的长行

Question

我\在shell脚本的末尾使用了避免长行,并提高了代码的可读性.但我无法在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");