Perl assign undef to variable - iztermpaperedkx.educabit.org