BEGIN { eval(" use LWP::UserAgent (); use HTTP::Request::Common; "); if ($@) { ... } } ...