Я пытаюсь сохранить регулярное выражение s/ / /g
как переменную (без большой удачи).
Вот пример, который использует обычное совпадение, чтобы показать, что я намерен делать.
my %file_structure = (
header => qr/just another/,
table => qr/perl beginner/,
)
Теперь я могу вызвать это с помощью $line =~ $file_structure{'header'}
, и он вернет undef
или true
, если шаблон совпадает.
Однако я хотел бы сказать $line =~ $file_structure{'foo'}
, где $file_structure{'foo'}
содержит что-то вроде s/beginner/hacker/g
.