Grazie per lo script. Mi è stato utile.
Occhio però che ci vuole un test sulla variabile $hash prima di chiamare la sub fz_decrypt_password.
---------------------
unless ($hash) {return;}
my $pass = fz_decrypt_password($hash);

print "HOST : $host\n";
print "PORT : $port\n";
-------------------------
(naturalmente il mio file .xml non era perfetto e, con $hash nullo, dava 'tentativo di dividere x 0'.

Saluti e complimenti

Lux

Grazie a te per la puntualizzazione ^^

Lo script fu scritto veramente di fretta perchè mi serviva nel giro di pochi minuti, poi in seguito decisi di pubblicarlo ma non ho più avuto ne il tempo ne la voglia di sistemarlo a dovere :P Mea culpa XD