Use of uninitialized value $BUFF in string eq at C:/Strawberry/perl/site/lib/Device/Leap.pm line 40. substr outside of string at C:/Strawberry/perl/site/lib/Device/Leap.pm line 115. #### Second Write attempted before First is done at ServoJoy.pl line 55. Use of uninitialized value $written in numeric ne (!=) at C:/Strawberry/perl/site/lib/Win32/SerialPort.pm line 1580.