Select Code to Download

#!/usr/bin/perl
use warnings;
...
  close( $lclient);
}
__END__

#!/usr/bin/perl
use warnings;
...

}
__END__

#!/usr/bin/perl
use warnings;
...
}
__END__