if ($file =~ /\Q$vokal\E/ ) { ... }