sub print_html {
print <<"HTML";

$self->{BKG_IMAGE}

HTML
}

print_html();