for (split "(?<=\Q$/\E)", $contents_of_FILE) { ...