Select Code to Download

eval {
  # my stuff ...
...
} or do {
  # what you are currently putting inside if ($@) {...} goes here.
}

if($opt_daemon) {
   # ... intro stuff
...
     $log->error("unable to insert data");
  }    
}

sub runMailHandler {
  my ($opt_mailid) = @_;
...
} else {
  runMailHandler($opt_mailid);
}