Perl subclass of AnyEvent::Handle that wraps Device::SerialPort