如何在perl中打印以$开头的字符串？
我想在文件中打印字符串（$abc$aaaaa#a$aa#）。我怎样才能做到这一点？下面的代码不起作用。
#!/usr/bin/perl
my $temp = "$abc$aaaaa#a$aa#";
my $filename = '/log/a.log';
open(FH, '>', $filename) or die $!;
print FH $temp ;
close(FH);
回答
双引号内插变量。如果您不想要，请使用单引号或反斜杠 $。
my $temp = '$abc$aaaaa#a$aa#';
# OR
my $temp = "$abc$aaaaa#a$aa#";
你应该总是use strict;和use warnings;。如果你这样做了，Perl 会告诉你出了什么问题。