W:\current>perl
use strict;
use Data::Dumper;
my @a = ( 'fred' );
push @{ $a[ 0 ] }, 'foo';
print Dumper \@a;
^Z
Can't use string ("fred") as an ARRAY ref while "strict refs" in use at - line 4.

W:\current>perl
use strict;
use Data::Dumper;
my @a = ( '' );
push @{ $a[ 0 ] }, 'foo';
print Dumper \@a;
^Z
Can't use string ("") as an ARRAY ref while "strict refs" in use at - line 4.