$files[$i]{hashkey}= [ split(/,/,$ARGV[0]) ];
[download]

print $files[$i]{hashkey}->[0];
[download]

(original poster)

Now I have a username to voice my gratitude... I had no idea so many people were watching this to help out people like me... dear lord!

By the time I had registered a username, logged in, and actually found my Anonymous Monk post, there were already four right answers!!

I am awed and humbled...

You have to force split into a list, before assigning it to the hash using square brackets . This discussed in this node about array and list context

>./test.pl some,kinda,sick,joke

#!/usr/bin/perl -w
use strict;
use Data::Dumper;

my @files=[
        {foo=>[qw/this that other/],
         bar=>[qw/them those they/]},
        {foo=>[qw/up down left right/],
         bar=>[qw/spin turn veer/]}
        ];

################# Square brackets round split ######
$files[2]{foo} = [ split(/,/,$ARGV[0]) ];

print Dumper @files;

__DATA__
$VAR1 = [
          {
            'foo' => [
                       'this',
                       'that',
                       'ottther'
                     ],
            'bar' => [
                       'them',
                       'those',
                       'they'
                     ]
          },
          {
            'foo' => [
                       'up',
                       'down',
                       'left',
                       'right'
                     ],
            'bar' => [
                       'spin',
                       'turn',
                       'veer'
                     ]
          }
        ];
$VAR2 = undef;
$VAR3 = {
          'foo' => [
                     'this',
                     'that',
                     'other'
                   ]
        };
[download]

use Data::Dumper;

$string = 'A,B,C';

@test = ();
$test[0]{test} = split(/,/, $string);
print Dumper(\@test);

@test = ();
@{$test[0]{test}} = split(/,/, $string);
print Dumper(\@test);
__END__
$VAR1 = [
          {
            'test' => 3
          }
        ];
$VAR1 = [
          {
            'test' => [
                        'A',
                        'B',
                        'C'
                      ]
          }
        ];
[download]