if ($file =~ /^\/\Q$data\E$/i)
{
}