$hi = do_this('asdf');
sub do_this
{
$blob{'f'} = {
'k' => 'j'
};
}
print $hi->{'k'};
# prints j
desde do_this no devuelve nada, ¿cómo se sigue imprimiendo, j?¿Por qué esta función Perl devuelve un valor?
Esperemos que esté en otro lugar de su código y simplemente no lo vemos en el fragmento, pero debe incluir 'use strict; use warnings; ' – Daenyth