История изменений

Исправление kilolife, 07.06.14 15:51 (текущая версия) :

Как это не удаляет?

perl -e '@t=("18_27","15_12"); $b1=18; $b2=27; @t = grep {! /^\d+_$b2$/ } @t; print "@t"'

15_12

Исправление kilolife, 07.06.14 15:50:

Как это не удаляет?

perl -e '@t=("18_27","15_12"); $b1=18; $b2=27; @t = grep {! /^\d+_$b2$/ } @t; print "@t"'

Исходная версия kilolife, 07.06.14 15:50:

Как это не удаляет?
[code]perl -e '@t=(«18_27»,«15_12»); $b1=18; $b2=27; @t = grep {! /^\d+_$b2$/ } @t; print «@t»'

15_12[/code]