my $sep = $arr[2];
split(quotemeta($sep), ...)