如何在Perl中打印特殊字符

Question

我的变量中有一个特殊的字符，如此

my $var = "\n"; 
my $var_tab = "\t";

我需要打印出不是这个字符而是字符值/代码（\ t，\ n） 我试图添加一个斜杠，但它不起作用。

 my $var.="\\";

如何打印特殊字符的值？

Answer 1

如果您解释了为什么要这样以及您想要实现的目标，这可能有助于我们理解背景。

如果您只想转储变量的值并使特殊字符可见且可读，那么Data :: Dumper可能会有所帮助：

use Data::Dumper

$var = "\n";
$var_tab = "\t";

$Data::Dumper::Terse = 1;
$Data::Dumper::Useqq = 1;

print Data::Dumper::qquote($var);      # "\n"
print Data::Dumper::qquote($var_tab);  # "\t"

Answer 2

如果您想要打印特殊字符值，请尝试regex替换\为空。喜欢

my $var = "\\n"; 
$var =~s/\\//g;
print "$'";

否则如果要打印\n。只需使用单引号而不是双引号。或在双引号内使用正斜杠。

my $var = "\\n";   #slashes for escape the special character 
my $var_tab = '\t'; #single quotes also escape the special character
print "$var  $var_tab  ";