Hi
I'm not a programmer but am muddling through as best I can. I am trying to set up a PostSearchHook for Radiator (RADIUS server), that carries out an LDAP lookup, and, based on the
string returned ("staff" or "student") in the "businessCategory" attribute, will set the $role to be either 40... (3 Replies)
Hi,
I can't get this script ot work and I wa wondering if anyone could help?
I need to open a file and use a subroutine to search each line for a regular expression. If it matches then I need to return a match from the subroutine and print the result?
Any help would be greatly... (11 Replies)
All,
Is it possible to call a subroutine from the perl expect module after logging to a system that is within the same program. My situation is I need to run a logic inside a machine that I'm logging in using the expect module, the logic is also available in the same expect program.
Thanks,... (5 Replies)
The following subroutine prints 1 instead of the content of the Equipment variable. Can someone tell me why?
#!c:/perl/bin/perl.exe
#
use strict 'vars';
my $Equipments = "data/equips.txt";
unless (open(EQUIP_FH, "$Equipments")) {
print "errors: $Equipments\n"; # This line prints... (1 Reply)
Hi,
ive a perl script, where it has a subroutine clear() in it, and i've one shell script which runs in background, from that shell script i wanted to call subroutine which is in perl script, that's perl script is not module, just simple script.
Eg:
perl script <test>
#!... (4 Replies)
Hi everyone,
I have given up finally trying to find a way to do this.
I have a subroutine called LoginFirst where I am starting a new SSH session.
I have bunch of subroutines, each one of them uses a (or I have to create
a new SSH constructor everytime) ssh connection to get some value so ... (2 Replies)
Hello All,
I have 2 perl sub-routines.
my $myDir = myDir_path;
my $file;
sub convert(){
system ("./$myConvertScript >> $myDir/$file_CONV" );
$file2 = $myDir/$file_CONV;
}
sub addDB(){
open(CONF, $config)
or die "Cannot Open $config for reading. ";
while(<CONF>){... (1 Reply)
Hi all, I have this code #This program read the triplets from file named "data" into
#an array of array.
use strict;
use warnings;
use Data::Dumper;
use Graph;
use Graph::Subgraph;
my @S;
while (<>) {
push @S, ;
}
print "-----TRIPLETS-------\n";
print Dumper \@S;
#Make... (6 Replies)
Hello All,
I am in the process of learning perl.I have a perl script and based on the arguments passed it would the appropriate subroutine that is defined in the script.
Now, I need to check a value that is defined in the Environment variables and should call the subroutine only if the... (1 Reply)
HI ,
I am running a program on hpux in perl.
I am encountering a strange issue where when i print a variable in the sub which is returning it , it prints a different value but when i call it and store value in a variable it gives a different o/p.
the sub is
sub CheckConfigFilePattern ... (4 Replies)
Discussion started by: Jcpratap
4 Replies
LEARN ABOUT DEBIAN
net::ldap::extension::whoami
Net::LDAP::Extension::WhoAmI(3pm) User Contributed Perl Documentation Net::LDAP::Extension::WhoAmI(3pm)NAME
Net::LDAP::Extension::WhoAmI - LDAP "Who am I?" Operation
SYNOPSIS
use Net::LDAP;
use Net::LDAP::Extension::WhoAmI;
$ldap = Net::LDAP->new( "ldap.mydomain.eg" );
$ldap->bind('cn=Joe User,cn=People,dc=example,dc=com",
password => 'secret');
$mesg = $ldap->who_am_i();
die "error: ", $mesg->code(), ": ", $mesg->error() if ($mesg->code());
print "you are bound with authzId ", $mesg->response(), "
";
DESCRIPTION
"Net::LDAP::Extension::WhoAmI" implements the "Who am I?" extended LDAPv3 operation as described in RFC 4532.
It implements no object by itself but extends the Net::LDAP object by another method:
METHODS
who_am_i
Obtain the authorization identity which the server has associated with the user or application entity.
SEE ALSO
Net::LDAP, Net::LDAP::Extension
AUTHOR
Norbert Klasen <norbert.klasen@avinci.de>,
Please report any bugs, or post any suggestions, to the perl-ldap mailing list <perl-ldap@perl.org>
COPYRIGHT
Copyright (c) 2002-2004 Graham Barr. All rights reserved. This program is free software; you can redistribute it and/or modify it under the
same terms as Perl itself.
perl v5.14.2 2012-01-29 Net::LDAP::Extension::WhoAmI(3pm)