Select Code to Download

my $ldap = new Net::LDAP($host, port => $port, localaddr => "yourhostn
+ame");

  use Data::Dumper;
  open($f,'>','/tmp/log);
  print $f Data::Dumper($arg);
  close($f);