Как мне преобразовать экранированный символ t в символ табуляции?

Question

У меня есть переменная, которая содержит косую черту и t.

my $var = "\\t";

Я хочу преобразовать это во вкладку. Как мне это сделать?

---

use Data::Dumper;
use Term::ReadLine;
my $rl = Term::ReadLine->new();
my $var = $rl->readline( 'Enter \t:' );
print Dumper $var;

Answer 1

Ниже приведено простейшее решение:

 $var = "\t" if $var eq "\\t";

Если вы хотите сделать это независимо от того, где последовательность появляется в строке, вы можете использовать

 $var =~ s/\\t/\t/g;

Но, похоже, вы не задаете правильный вопрос. Ничто не поддерживает \t и ничего больше. По крайней мере, я бы также ожидал, что \\ даст \. Возможно, вы пытаетесь разобрать JSON? Если это так, есть ряд других escape-последовательностей, о которых вам нужно беспокоиться.