在一个步骤中将字符串写入和修改为变量

Question

我想保存一些代码但是找不到将数组元素的内容保存到变量中并同时修改此字符串的方法：

$state = $displayContents[$ln+6];
$state =~ s/(.+State.+)([ON|OFF]LINE)/$2/;

我正在寻找类似的东西：

$state = $displayContents[$ln+6] =~ s/(.+State.+)([ON|OFF]LINE)/$2/;

有没有办法保存一些代码并在一行中执行这两个步骤？

Answer 1

你非常接近。试试这个：

( my $state = $displayContents[$ln+6] ) =~ s/(.+State.+)([ON|OFF]LINE)/$2/;

=~优先于=，请参阅perldoc perlop。