2704 use strict;

  2704 use strict;

  2705 use warnings;

  2705 use warnings;

  2706 use Fatal qw/open/;

  2706 use Fatal qw/open/;

  2707 

  2707 

  2708 $0 = 'shelldap';

  2708 $0 = 'shelldap';

  2710 

  2710 

  2711 use Getopt::Long qw(:config no_ignore_case);

  2711 use Getopt::Long qw(:config no_ignore_case);

  2712 use YAML::Syck qw//;

  2712 use YAML::Syck qw//;

  2713 use Pod::Usage qw//;

  2713 use Pod::Usage qw//;

  2714 eval { require Term::ReadLine::Gnu; };

  2714 eval { require Term::ReadLine::Gnu; };