Hello,
I made the following modification to the script
$res = new Net::DNS::Resolver(nameservers => [qw(127.0.0.1)]);
and now I get
Update error code: NOTAUTH.
This now looks really like a authorization problem, but, as I wrote, I
got the key from named.conf.
Bye
Andreas
--
To unsubscrib
Hello,
I would like to update the bind nameserver via a perl script.
Named is running on the same machine I start the script.
I copied the key from
named.conf
key DHCP_UPDATER {
algorithm HMAC-MD5.SIG-ALG.REG.INT;
secret mykeyishere;
};
inserted it into my script and run it.
I always get
"U
Andreas Moroder schrieb:
Hello,
is it possible to get the acl entrie of a directory on linux with perl ?
Thanks
Andreas
Hello,
probably I have found the module I need, it is File-ExtAttr
but I when i start perl Makefile.pl I get this error
"Can't build and link to 'attr'
Hello,
I have a entry in my directory that is a soft-link to another directory.
Is there a way in perl to get, starting from the link, the path of the
real directory ?
Thanks
Andreas
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@per
Hello,
is it possible to get the acl entrie of a directory on linux with perl ?
Thanks
Andreas
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
Andreas Moroder schrieb:
Hello,
I would like to get a list of the memberUids from a openldap group.
I tried with the script above, but even if I have 3 members I get as
count only 1 and the results contains a single string with all 3 members.
Can anyone please help me.
Thank you
Andreas
Hello,
I would like to get a list of the memberUids from a openldap group.
I tried with the script above, but even if I have 3 members I get as
count only 1 and the results contains a single string with all 3 members.
Can anyone please help me.
Thank you
Andreas
use Net::LDAP qw(:all);
use
AM> I did not ask because I want to learn perl, but because I need the
AM> functionality of this application. I did not find anything else that
AM> does a similar job.
then why did you ask here, on a list aimed at teaching perl to
beginners? this is not the place to ask for help on how to f
JWK> 5) It is Perl4 code from 8 years ago.
that code is an abomination. one quick bug is the GetDir recursive
descent sub to get all dirs doesn't check for symlinks so it can easily
fall into an infinite recursion. the abuse of undef() is beyond bad nor
needed. and as john said, it is perl4 cod
Hello,
I have found a nice utility
http://www.novell.com/communities/node/389/adm+file+utilities+2+5
that has two problems:
1) It creates directories and files but it uses the \ backslash so it
does not work on a linux machine.
Is there a constant or a function that give back the right charac
Алексеев Александр schrieb:
$ perl
printf "%15s %15s\n", "hello", "world";
^D
hello world
--
Alexandr A Alexeev
Hello Alexander,
thanks you for the hint.
"%s-15" with the - is what I searched for.
Thanks
Andreas
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
Hello,
I want pro print to screen two strings. The problem ist that the length
of the strings are variable, so I get a unreadable output. Even using \t
does not help because the lenght can vary from 5 to 15 characters.
Is there a simple way to expand the first columnt to a fixex size.
Thanks
Hello,
according to the man glob can only sort by name. Is there a way to get a
list of files sorted by date ?
Bye
Andreas
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
Hello,
does a IMAP library exist that supports this functionality:
connect to the IMAP server as administrator and create a mail with a
attachment in the drafts folder of a specified user.
I searched cpan, but from the documentation I dit not find out if the
libraries does what I want.
Than
Hello,
I would like to parse ms .adm files. This files have a tree structure
that look like
Category Name1
category Name2
categor Name3
Policy pol1
data lines here
...
End policy
Policy pol2
data lines here
...
End policy
end ca
Hello,
on our linux system I have a script that runs as root that should return
a list of subdirectorys a specific user can access.
I have the four directories and aside the users that can access them
dira ( usera,userb, userc)
dirb ( userb )
dirc ( userc )
dird ( usera, userc )
When
Hello,
I have to store more then one value in a hash array. I tried to store a
array as value in the hash. But when I try to retriev it I don't get the
array I have stroed.
Can anyone please help me.
Thanks
Andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mai
Hello,
I have two arrays with strings and I have to find out the differences
between this arrays. Is a perl function available that does this ?
Thanks
andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Hello,
after a long search I found a script that creates oracle password
hashes. I need the result of this script to store the password in out
LDAP database in the oracle hashed format. The problem is that it is a
php script and I need it in perl.
I am a perl beginner and I am not able to co
Thank you to all for your help.
Andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Hello,
in our application I have to convert all german Umlaute in a string to a
two char combination ä to ae, Ö to OE and so on.
Can anyone please tell me how to do this ?
Thanks
Andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://l
Sorry,
I know I should write all in one answer ;)
I think in this place the algorithm is explained better.
http://groups.google.com/group/comp.databases.oracle/msg/83ae557a977fb6ed?hl=en
Bye
Andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTE
I'm a bit unclear about step 5, but it should be doable in Perl once
you determine the EXACT steps you need to take. Here are some tips
to maybe get you through the first four steps.
This my be far off from what Oracle needs, but it seems to work
for your first 4 steps. Some questions remain, lik
Hello,
I got this steps from
http://www.ecuoug.org/papers/OraclePasswordAlgorithm.pdf
I'm a bit unclear about step 5, but it should be doable in Perl once
you determine the EXACT steps you need to take. Here are some tips
to maybe get you through the first four steps.
This my be far off from wh
Hello,
I have to calculate a hash of username and password in perl.
The calculation should be done this way:
1. Concatenate the username and the password to produce a plaintext string;
2. Convert the plaintext string to uppercase characters;
3. Convert the plaintext string to multi-byte storage
ed,@directories);
sub wanted {
my ($dev, $ino, $mode, $nlink, $uid, $gid) = lstat($_);
if (!(defined(getpwuid($uid)) && defined(getgrgid($gid {
print $File::Find::name . "\n";
}
}
On Feb 28, 2007, at 12:12 AM, Andreas Moroder wrote:
Hel
Hello,
I need a perl script that runs under linux that should recursively
search the directory tree and print out all the files that have a uid or
gid that does not resolv to a username or userid.
Can anyone give me a hint ?
Thanks
Andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For a
Quoting Roman <[EMAIL PROTECTED]>:
Hope fully this helps
### Script start
use strict;
my $process_dir =
'C:\work\_RHWork\projects\perl-beginers\directory-read\files-dir';
opendir(DIR,$process_dir) or die "Can't open dir: $! \n";
my @files = readdir(DIR) or die "Can't read dir: $! \n";
c
Hope fully this helps
### Script start
use strict;
...
Hello,
problem solved.
The script was writeen for windows with \\ in the path. It should run
on a linux box. I replaced the \\ with // and now it works.
Is ti possible, for compatibility, to use // in windows too ?
Thanks
Andreas
Based on your specs this should work:
perl -lne'print $ARGV =~ /^PC=([^,]+)/, " $1" if
/^Mac-Adresse:\s*([[:xdigit:]:]+)/' PC*
John
Hello John,
no, it doesn't
It returns two times the name of the pc.
Bye
Andreas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail:
Hello,
I have a directory with many files with names made like this two:
PC=laptop-fortbild,USER=fsigmund,OS=95-98
PC=INFO-FABIAN,USER=fsigmund,OS=W2K-XP
This text files may contain a line like this one
Mac-Adresse: 00:10:D7:09:5E:16
With grep
grep Mac-Adresse PC* | awk -F , '{print $1" " $3
31 matches
Mail list logo