Perl code to read a Bosch BMP180 connected to a Raspberry Pi