perl Data-Stream-Bulk