sub section2 
{
print <<ENDHTML;
# Html goes in here
ENDHTML       

unless ($home_fax eq ""){
print <<ENDHTML; 
# Html goes in here
ENDHTML
}        

print <<ENDHTML;
# Html goes in here
ENDHTML

unless ($Company eq "")
{
print <<ENDHTML; 
# Html goes in here
ENDHTML        
} 

unless ($position eq "")
{
print <<ENDHTML;
# Html goes in here
ENDHTML
} 


unless ($company_address1 eq "")
{
print <<ENDHTML;
# Html goes in here
ENDHTML
} 

unless ($company_postal1 eq ""){
print <<ENDHTML;        
# Html goes in here
ENDHTML
} 

unless ($company_phone eq "")
{
print <<ENDHTML;        
# Html goes in here
ENDHTML
} 

unless ($company_fax eq "")
{
print <<ENDHTML;        
# Html goes in here
ENDHTML
}

print <<ENDHTML;
# Html goes in here
ENDHTML
}