print PASSF "$rec_ref->[0] $rec_ref->[1] $rec_ref->[2]" ^ 
            getcryptkey();