无法使用perl交换变量？

Question

这里我尝试使用perl交换变量。

#!/usr/local/bin/perl
 use strict;
 use warnings;
 my $v1=23;
 my $v2=43;
 $v1,$v2)=($v2,$v1)
 print $v1,$v2;

错误：

syntax error at exchange.pl line 7, near ")
print"
Execution of exchange.pl aborted due to compilation errors.

例外输出：

43,23

Answer 1

你忘记了开放的parens和分号：

($v1,$v2)=($v2,$v1);
print $v1,$v2;

预期输出应为4323（4个字符且无逗号），而不是433。

要打印43,43：

print "$v1,$v2";