请问我想由perl读取条码机barcode所传来的数据，试了好多方法就是不得要领。
我在终端机扫条码是可以出现在终端机前，但是如何由perl去读取输入的数据呢？
1. Device::USB
2. Device::HID
3. Barcode::ZBar
主机： raspberry 3B+ Debian 8.0
以下是主机已经取得的资讯：
1 Device::USB::CLASS_CLASS_PER_INSTANCE (0)
04B4:0100 00 Mfg: Future P: USB Virtual PS2 Port
QLAB Irradiance sensor device:
Device::USB::Device=HASH(0xaa6668)
Device: 04B4:0100 Class 0000
Manufactured by Future
Product: USB Virtual PS2 Port

usb条码机进来的数据就已经跟键盘鼠标一样了吧$data = <STDIN>; 就直接进来了 还是你是特别的用途?