perl Data-Buffer