|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander Bolotnov 2:5052/4.82 11 Jan 2003 23:43:42
To : Sergey V. Beduev
Subject : Интерполяция переменной
--------------------------------------------------------------------------------
>> my $a = '\d\d\d';
>> my @line = ('123','\d\d\d','234');
>> for(@line){print if $_ eq $a};
>> подойдет?
> Hу вообщем в принципе как я описал проблему подойдет.
> Hо вопрос был про другое, как избавиться от интерполяции переменной
> для вот таких данных ?
> $a = ("123","aaa\d\d\dbbb","234");
Hикак.
> что бы вывелся элемент 'aaa\d\d\dbbb'
Если почитать "Quote and Quote-like Operators", то ведь там написано, что ""
(qq{}) интерполируют, а '' (q{}) - нет. Судя по этому, выхода два -
либо
my @a = ("123", 'aaa\d\d\dbbb', "234");
print $line[1];
либо my @a = ("123", "aaa\\d\\d\\dbbb","234");
print $line[1];
в обоих случаях будет отдаваться то, что желается.
Alexander Bolotnov.
---
* Origin: Вставить оригинальность по вкусу... (2:5052/4.82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
