@werte=unpack('L*',$in)