my $file = $filenames->{$datamodel}; this will work.
the quotes were just a mistake.
Now that I can reference it this way I will get rid of numelements.
I will keep those references in my favorites thank you.