System error

error:  Can't locate object method "host" via package "URI::mailto" at /usr/lib/perl5/site_perl/5.8.0/URI/WithBase.pm line 50.
context: 
... 
46:  {
47:  my $self = shift;
48:  my $method = substr($AUTOLOAD, rindex($AUTOLOAD, '::')+2);
49:  return if $method eq "DESTROY";
50:  $self->[0]->$method(@_);
51:  }
52: 
53:  sub can { # override UNIVERSAL::can
54:  my $self = shift;
... 
code stack:  /usr/lib/perl5/site_perl/5.8.0/URI/WithBase.pm:50
/usr/local/contact/perl/ContactDB/Web/Lib.pm:40
/home/www/html/dhandler:20
raw error






























Can't locate object method "host" via package "URI::mailto" at /usr/lib/perl5/site_perl/5.8.0/URI/WithBase.pm line 50.


Trace begun at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t locate object method "host" via package "URI::mailto" at /usr/lib/perl5/site_perl/5.8.0/URI/WithBase.pm line 50.^J') called at /usr/lib/perl5/site_perl/5.8.0/URI/WithBase.pm line 50
URI::WithBase::AUTOLOAD('URI::URL=ARRAY(0xafe3674)', 'www.midcountrywholesale.com') called at /usr/local/contact/perl/ContactDB/Web/Lib.pm line 40
ContactDB::Web::Lib::subdomainize('Apache::Request=SCALAR(0xafd31a8)', 'www.midcountrywholesale.com', undef) called at /home/www/html/dhandler line 20
HTML::Mason::Commands::__ANON__('<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">^M^J<html>^M^J<head>^M^J<title>MidCountryWholesale.com</title>^M^J<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">^M^J<link href=\'main.css\' rel=\'stylesheet\' type=\'text/css\'>^M^J</head>^M^J<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">^M^J<table width="760" height="455" border="0" align="center" cellpadding="0" cellspacing="0" id="main">^M^J  <tr>^M^J    <td height="19"><img src="images/index_01.jpg" width="760" height="107" border="0" usemap="#Map"></td>^M^J  </tr>^M^J  <tr>^M^J    <td class="text" valign="top"> <br>^M^J      <div align="center">^M^J        <table width="100%" border="0" cellspacing="0" cellpadding="0">^M^J          <tr> ^M^J            <td class="text" valign="top"><b>1. How do you ship and what are the ^M^J              costs?</b><br>^M^J              We ship UPS ground unless you are ordering by the pallet. Cost is ^M^J              based on the weight of the package and the &quot;Ship to&quot; zip ^M^J              code. We charge only what UPS bills us. No handling or processing ^M^J              fees like other companies. ^M^J              <p><b>2. Is there a minimum order?</b><br>^M^J                Yes. If you are ordering in less than case lot quantities, there ^M^J                is a minimum of $100.00. If you however order two or more cases ^M^J                in full case lot quantities, we will waive our order minimum.</p>^M^J              <p><b>3. How long before I receive my order after it has been placed?</b><br>^M^J                We try and ship orders within 48 hours after we receive it. If ^M^J                you place your order on the weekend, it will be processed on the ^M^J                following Monday. After that, you should receive your order within ^M^J                3 to 5 business days.</p>^M^J              <p><b>4. How can I place my order?</b><br>^M^J                We have 3 methods by which you can order. You can order online ^M^J                using our secure shopping cart, You can fax your order to 1-904-339-9550 ^M^J                (Try our &quot;Print &amp; Fax&quot; ordering system. Just add ^M^J                items you wish to purchase into your shopping cart and then click ^M^J                &quot;Print &amp; Fax Order&quot; button).</p>^M^J              <p><b>5. What forms of payment do you accept?</b><br>^M^J                We can process your order using Visa, MasterCard and Paypal.</p>^M^J              <p><b>6. Are your products guaranteed?</b><br>^M^J                Yes, we want you to be satisfied. If there is damaged or non working ^M^J                products, we will replace it or give you your money back. If you ^M^J                are not satisfied with what you have received, just return it ^M^J                within 15 days for a full refund (minus shipping). We make every ^M^J                effort to represent all products clearly and honestly.</p>^M^J              <p><b>7. Do you have a catalog?</b><br>^M^J                Our merchandise changes so frequently, it would be impossible ^M^J                to keep a catalog up to date.</p>^M^J              <p><b>8. Do you drop ship?</b><br>^M^J                We are currently not set up to drop ship. We may consider it in ^M^J                the near future.</p>^M^J              <p><b>9. Where do you ship?</b><br>^M^J                We only ship within the continental US and Canada(see #10 below), ^M^J                however we do have customers that export our products overseas. ^M^J                If you would like to purchase our items and you live outside of ^M^J                the US or Canada, just make transportation arrangements with a ^M^J                freight forwarder within the continental US and provide us with ^M^J                their information when you place an order. We will ship your order ^M^J                to them and they will take care of it from there. You can find ^M^J                freight forwarders by doing a search on the internet or contact ^M^J                your local customs office and they will provide you with a list ^M^J                of freight forwarders that operate in your country and in the ^M^J                US.</p>^M^J              <p><b>10. I live in Canada. How do I place an order?</b><br>^M^J                Unfortunately, we can not process orders to Canada using our online ^M^J                shopping cart. You can either email or fax your order to us. Be ^M^J                sure to include the Item Number(s), Quantity, Shipping Address ^M^J                and an email address so we can contact you with a shipping quote ^M^J                and total.</p>^M^J              <p>If you have any other questions that were not answered above, ^M^J                please e-mail us at: <a href="mailto:midcountrywholesale@yahoo.com">midcountrywholesale@yahoo.com</a>. ^M^J              </p>^M^J              <p>&nbsp;</p>^M^J          </td>^M^J          </tr>^M^J        </table>^M^J      </div>^M^J      </td>^M^J  </tr>^M^J  <tr>^M^J    <td class="footer" height="10">&nbsp;</td>^M^J  </tr>^M^J</table>^M^J<map name="Map"> ^M^J  <area shape="rect" coords="17,85,67,104" href="index.html">^M^J  <area shape="rect" coords="88,83,161,103" href="articles.html">^M^J  <area shape="rect" coords="182,82,279,102" href="resources.html">^M^J  <area shape="rect" coords="294,84,340,103" href="faq.html">^M^J  <area shape="rect" coords="354,84,459,104" href="contact.html"> ^M^J</map>^M^J</body>^M^J</html>^M^J') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1269
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 461
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 461
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 413
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xaf1ea5c)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 167
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xaf1ea5c)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 817
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x9c3cd90)', 'Apache=SCALAR(0xafec4e4)') called at (eval 44) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache=SCALAR(0xafec4e4)') called at /dev/null line 0
eval {...} at /dev/null line 0