<cfset selectedFruit = "">
<cfloop list="#form.fieldnames#" index="i">
<cfif findNoCase("fruit", i) NEQ 0>
<cfset selectedFruit = listAppend(selectedFruit, replaceNoCase(i, "fruit", "", "all"))>
</cfif>
</cfloop>
<cfoutput>The selected fruit were: #selectedFruit#</cfoutput>