open FILE, ">>$ENV{'DOCUMENT_ROOT'}/some_path/some_other_path/some_pass_file" or die $!;

   print FILE "webmaster:&#916;&#951;&#956;&#953;&#959;&#965;&#961;&#947;&#943;&#945; &#914;&#940;&#963;&#951;&#962; &#916;&#949;&#948;&#959;&#956;&#941;&#957;&#969;&#957;!:"          .Digest::MD5::md5_hex("admin:&#916;&#951;&#956;&#953;&#959;&#965;&#961;&#947;&#943;&#945; &#914;&#940;&#963;&#951;&#962; &#916;&#949;&#948;&#959;&#956;&#941;&#957;&#969;&#957;!:this_is_the_pass")          ."\n";

close FILE;