Я хотел бы использовать переменную как шаблон RegEx для сопоставления имен файлов:
my $file = "test~";
my $regex1 = '^.+\Q~\E$';
my $regex2 = '^.+\\Q~\\E$';
print int($file =~ m/$regex1/)."\n";
print int($file =~ m/$regex2/)."\n";
print int($file =~ m/^.+\Q~\E$/)."\n";
Результат (или на ideone.com):
0
0
1
Может ли кто-нибудь объяснить мне, как я могу использовать переменную как шаблон RegEx?