perl -wle 'print 0xff ^ unpack "%8C*", pack"H*", "000181080002020202020202"' 103