alf, non mi è chiara una cosa...
codice:
if ( $pass_r1 == luogo[$m] [1] )  { $pass_mail1 = luogo[$m] [2]; }
è sempre vera perchè poche righe prima hai settato tu $pass_r1 = luogo[$m][1], quindi non ti basta solo fare $pass_mail1 = luogo[$m][2] ???