print qq| |; if ($per_admin) { print qq| |; } print qq| |; if ($rec{'Description'}) { print qq| |; } if ($rec{'Nearby Attractions'}) { print qq| |; } print qq| |; if ($rec{'Terms'}) { print qq| TR> |; } if ($rec{'URL'}) { print qq|
<$font_color>ID:  <$font>$rec{'ID'}
<$font_color>Title:  <$font>$rec{'Title'}
<$font_color>Type:  <$font>$rec{'Type'}
<$font_color>Pricing:  <$font>$rec{'Pricing'}
<$font_color>Description:  <$font>$rec{'Description'}
<$font_color>Nearby Attractions:  <$font>$rec{'Nearby Attractions'}
<$font> |; if ($rec{'Air Conditioning'}) { print qq| $rec{'Air Conditioning'} |; } if ($rec{'Swimming Pool'}) { print qq| $rec{'Swimming Pool'} |; } if ($rec{'Jacuzzi'}) { print qq| $rec{'Jacuzzi'} |; } if ($rec{'Deck or Patio'}) { print qq| $rec{'Deck or Patio'} |; } if ($rec{'Garage'}) { print qq| $rec{'Garage'} |; } if ($rec{'Coffee Maker'}) { print qq| $rec{'Coffee Maker'} |; } if ($rec{'Microwave'}) { print qq| $rec{'Microwave'} |; } if ($rec{'Dishwasher'}) { print qq|$rec{'Dishwasher'} |; } if ($rec{'Refrigerator'}) { print qq|$rec{'Refrigerator'} |; } if ($rec{'Cooking Range'}) { print qq|$rec{'Cooking Range'} |; } if ($rec{'Grill'}) { print qq| $rec{'Grill'} |; } print qq| <$font>|; if ($rec{'Telephone'}) { print qq|$rec{'Telephone'} |; } if ($rec{'Answering Machine'}) { print qq|$rec{'Answering Machine'} |; } if ($rec{'Cable TV'}) { print qq|$rec{'Cable TV'} |; } if ($rec{'VCR'}) { print qq|$rec{'VCR'} |; } if ($rec{'Radio'}) { print qq| $rec{'Radio'} |; } if ($rec{'Washer and Dryer'}) { print qq|$rec{'Washer and Dryer'} |; } if ($rec{'Waterfront'}) { print qq|$rec{'Waterfront'} |; } if ($rec{'Baby Equipment'}) { print qq|$rec{'Baby Equipment'} |; } if ($rec{'Linens and Towels'}) { print qq|$rec{'Linens and Towels'} |; } if ($rec{'Pets Allowed'}) { print qq|$rec{'Pets Allowed'} |; } if ($rec{'Security System'}) { print qq|$rec{'Security System'}|;} print qq|
<$font_color>Payment Policies:  <$font>$rec{'Payment Policies'}
<$font_color>Terms:  <$font>$rec{'Terms'}
<$font_color>URL:  <$font>$rec{'URL'} |; } print qq|
<$font_color>UserID:  <$font>$rec{'UserID'}
|; }