my $entity = 
    $self->{blablabla}{more_bla}{and_more}[$_];

$entity = 'a' . $entity;

$self->{blablabla}{more_bla}{and_more}[$_] =
    $entity;