Perl Scripts to control the Panasonic LF20 LCD TV Series