in reply to Use of uninitialized value in string eq
if (defined $moh) { ..... } [download]
You are trying to compare with an uninitialized string... Do all those if it is defined. if (defined $moh) { ..... }
That is just treating the symptoms rather than the root cause of the problem. Much simpler and safer, surely, to initialise,
my $moh = q{}; [download]
before use.
Cheers,
JohnGG