@functions = split /(?=\n\s*function\s)/, $data;