This is the code I used for the right frame in the first picture.#!/usr/bin/perl#use CGI qw/:standard/;use URI::Escape;my $cols = 3;my %button_codes;$button_codes{'1'}='BTN_1';$button_codes{'2'}='BTN_2';$button_codes{'3'}='BTN_3';$button_codes{'4'}='BTN_4';$button_codes{'5'}='BTN_5';$button_codes{'6'}='BTN_6';$button_codes{'7'}='BTN_7';$button_codes{'8'}='BTN_8';$button_codes{'9'}='BTN_9';$button_codes{'0'}='BTN_0';$button_codes{'Ch-'}='KEY_CHANNELDOWN';$button_codes{'Ch+'}='KEY_CHANNELUP';if...