$ perl -w -Mstrict -MData::Dumper -e 'my $x = {}; @{$x} = split /\s/, "the one true"; print Dumper($x)'
Not an ARRAY reference at -e line 1.