in reply to Initializing a hash using a foreach loop

That is faster and tidier with a hash slice, 

my %ServerStatus;
@ServerStatus{split( /\|/, getIAMparameter('IAMIp'))} = 
    map {[$_,'unknown']} split /\|/, gwtIAMparameter('IAMNames');

[download]
Keeping IAMNames and IAMIp synchronized in your configuration may be a maintainance problem for you.

After Compline,
Zaxo

In Section Seekers of Perl Wisdom