AW: oops concepts

Perl OOP is simple. All you need is here http://perldoc.perl.org/perltoot.html And here http://perldoc.perl.org/perltooc.html Short intro: Bless blesses a Datacontainer (scalar array or hash) with the name of the package. Block{ bless @array; print [EMAIL PROTECTED]; } Prints out something

AW: want to make a list of all users connected to a network

Google for network scanner Or Download.com for network scanner You will get at last 100 free programms, skripts and code examples written in every single programming language. for perl use threads (or the exotic parloop, poe, fork stuff) and net::ping::external. -Ursprüngliche

AW: User input: dates spanning multiple months

First I would use unix internal time format(epochen). And I would use Date-Calc (search.cpan.org/dist/Date-Calc/), Date-Calendar. This should solve nearly all of your problems. Parsing CLI, should be done with getopt... BTW: Ever heard about cron? -Ursprüngliche Nachricht- Von: Mathew

Is a SNMP.pm and SNMP::Multi guru around?

HI, if got a short question about the usage auf snmp.pm and snmp::multi. I bundle request which are queued for the same timeframe, to get rid some overhead. I noticed that requests done with only a single nonrepeaters var, return an array of varlists containing an array of datafield. @{var}{data}

WG: Open files and looking a word

Net::Ping has serveral Bugs and is not threatsafe. I posted a fix here and asked for help to fix and upload to cpan... There is an error in setting up the dataframe and an error in building the identification number. Use net-ping-external or use Backticks and ping. If you just read a logfile,

AW: Problem in opening the file using Tail Module

Buffering is a problem, when you are printing to files or pipes. The Systems don´t write everything right away to disc. It waits until it has some time for it or the buffer is full. If you disable buffering, you write without wait for the cost of performance. (if you want to write with no

AW: Problem in opening the file using Tail Module

rtfm ^^ -Ursprüngliche Nachricht- Von: sivasakthi [mailto:[EMAIL PROTECTED] Gesendet: Mittwoch, 29. August 2007 13:16 An: beginners perl Betreff: Re: Problem in opening the file using Tail Module File::Tail will read only lines that are added to the file after it has been

AW: More Perl and AJAX

Ihhhkk @values = @_; Or you got the number of elements. -Ursprüngliche Nachricht- Von: Mathew Snyder [mailto:[EMAIL PROTECTED] Gesendet: Mittwoch, 29. August 2007 13:32 An: Perl Beginners Betreff: More Perl and AJAX When passing a value from JavaScript to a Perl script, am I right

AW: reading from a file

There is a modul on cpan that does what you want. It´s called File::Tail or something like that. -Ursprüngliche Nachricht- Von: Andrew Curry [mailto:[EMAIL PROTECTED] Gesendet: Dienstag, 24. Juli 2007 12:12 An: Octavian Rasnita; Jeff Pang; beginners perl Betreff: RE: reading from a file

Leading zeros kept or not kept while increment or decrement

Perl does $x=0001; $x++; print $x; Output: 0002 BUT $x=0002; $x--; print $x; Output: 1 Why and how can I avoid that. (yes, i know about printf) -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

AW: Net::Ping Bug found?

traffic. Thanks, Bastian -Ursprüngliche Nachricht- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Im Auftrag von Tom Phoenix Gesendet: Mittwoch, 16. Mai 2007 23:12 An: Angerstein Cc: beginners@perl.org Betreff: Re: Net::Ping Bug found? On 5/16/07, Angerstein [EMAIL PROTECTED] wrote: Start

Net::Ping Bug found?

able or have time to patch this, please patch the multithreadsupport patch right with it. (https://rt.cpan.org/Public/Bug/Display.html?id=4170) If you need to verify the fix feel free to ask me. Bastian Angerstein -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

AW: Net::Ping Bug found?

the .bin files you got from iptrace. Post what system/os was used. Thanks!! You can open the files with wireshark or ethereal. -Ursprüngliche Nachricht- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Im Auftrag von Tom Phoenix Gesendet: Mittwoch, 16. Mai 2007 18:38 An: Angerstein Cc

Dr. Camles Brain De-Age Game

Hi, I had some spare time and write a perl version of dr. kamigawas brain age / Big Brain Academy. There are 6 Memory and Calculation tests. You need the Moduls Heap-Simple and Time::HiRes. If somebody adds further tests/games etc. please mail back. Have Fun! #!/usr/local/bin/perl use

Type globs of subroutines?

Short Question: Is type globbing of subroutines possible or not? for something like supersub(\smallsub); -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Looking for 5.8.7 AIX 4.3.3 tar-ball

Hello there, I am looking for a perl tarball, version 5.8.7 build with threading ( 64bit not necessary ), build with gcc. If somebody knows where to get this, please replay. Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: Looking for 5.8.7 AIX 4.3.3 tar-ball

I´m forced to use the old AIX OS Version 4.3.3. -Ursprüngliche Nachricht- Von: Eko Budiharto [mailto:[EMAIL PROTECTED] Gesendet: Donnerstag, 16. Februar 2006 10:56 An: Angerstein Betreff: Re: Looking for 5.8.7 AIX 4.3.3 tar-ball Hi anger, one of the place is in the activestate(http

What is $ (can´t find it in the Camelbook)

Hello there, I found the $ Scalar in some examples but I can´t figure out what they are for. Could someone tell me what $ is? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

XML Question using XML::Element

I am fresh to the new glorious World of XML, and trying to figure out how this stuff melds together with perl. I found http://www.xml.com/pub/a/2001/04/18/perlxmlqstart1.html could somebody look over my code analysis and tell me if I am (nearly) right? require files/camelid_links.pl; # Needs the

Net::Telnet Updating Prompt?

Hello, I have a small issue with net::telnet 3.03. The Device I want to connect aus an OS-Level CLI and a Application-Level CLI. I have to log in to OS-Level to gai Access to Application level. Now, the problem is, the command prompt of the application is different from the prompt of the Os

Shortest iteration of an array?

for ($y = 1; $y = $thrc; $y++){ $ary[$y] = threads-new(\net1, $proto, $time); $ary[$y]-detach; } #or @ary[1..150] = 0; foreach $element (@ary) { $element = threads-new(\net1, $proto, $time); $element = detach; } something short like or similar possible? #this don´t work...

How to handle Null-Charakters

Hello, I have a problem reading strings out of a binaery file. The last 128 Byte of the File contains a String I want to work with. (sorry, this code is windows, feel free to flame me ^^) my $tsize = 128; my $fsize = (-s d:\\mp3\\forseti.mp3); my $offset =

Re: How to handle null-chars

@id3v1 contain 128 Byte Bincode. to fix 0 Chars I do: ### $label = cleanup(0,3); sub cleanup { my $jn; $start = shift; $stop = shift; $jn = join(, @id3v1[$start..$stop]); $jn =~ s/\0//; return $jn; } ### Anybody with something

Could somebody please explain what this line does? $x3

I have a Line of code I just don´t know waht it does. Especialy the underlined section: All used vars are scalars. my $d = (($facility_i3)|($priority_i)); -- Its from Net::Syslog syslog.pm line 93. Thanks Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

How to figure out Size of Var.

How can I figure out how many chars are stored in a variable? Or how can I determit the length of a string in a variable? this methode is a little poor: @array = split //, $var; $size = scalar (@array); Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

How to remove everything after the last . dot?

I have a line: i.like.donuts.but.only.with.tea now I want to remove everything that follows the last . including the last .. in this case .tea I hav absulte no idea. I tried something like: @parts = splite /\./, $line; $parts[-1] = undef; foreach $parts (@parts) { $newline .= $parts.;

AW: How to remove everything after the last . dot?

Hmmm... use strict; use warnings; my $a=i.like.donuts.but.only.with.tea; $a=~s/\.\w+$//; # maybe w+ not d+??? print $a, \n; Deutsche Telekom AG T-Com, Technische Infrastruktur Niederlassung Überregional Bastian Angerstein Network Support Center - Network Management Support Maybachstr.57; D

Moving Directories containing files (something more tricky)

Hello there, I have a tricky problem, I have some (alot) directories containing alot of files. I want to move the directory /xyz/123/ with all containing files to /xyz/abc/123. The source directory does not (or should not) contain subdirectories. Does anybody have something for me ? Thanks,

how to handle multiline feedback from backticksoperator?

Hello there, I have a cmd-PRogramm which produce multiline output. /usr/testdrive. I call this proggi from perl: `/usr/testdrive -e -k | grep /home`; This programm produce multiline Output, how do I get this into a variable or array ? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

Example of hash and array movement correct?

Hello, I am looking for ways to move data between array and hashes. Does anybody has a better way or idea to do some of this: Example 1: @indatas = $datas [0 .. 4]; Example 2: $nkey = $dataln[3] . $dataln[4]; Example 3: $base{$bv[0]} = [ $bv[1], $bv[2], $bv[3], $bv[4] ];

How to add leading zeros?

Hello, I have some Numbers 1 2 3 40 51 and I want them to be in the format 001 002 003 ... 040 ... 051 ... What is the fastest way to do this?? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

AW: email reading script

try http://www.koders.com they have a lot of code to evaluate. -Ursprüngliche Nachricht- Von: vishwas bhakit [mailto:[EMAIL PROTECTED] Gesendet: Donnerstag, 25. November 2004 10:19 An: [EMAIL PROTECTED] Betreff: email reading script hello, I am working for email reading script in perl,

Sinus and PI in perl

Hello, in an excel sheet I use: =SIN((2*PI()/96)*1) =SIN((2*PI()/96)*2) etc... my question is how to get this function in perl? The Results are values (in the example max. 96) on the Y-Axes of the Sinuswave. BTW: I want to replace the 96 (measuringpoints) and the multiplication value with

AW: Reading from a filehandle in while-loop

Yes it should, but not on my system. Thanks for your comments. -Ursprüngliche Nachricht- Von: Bob Showalter [mailto:[EMAIL PROTECTED] Gesendet: Dienstag, 26. Oktober 2004 16:00 An: 'David le Blanc' Cc: [EMAIL PROTECTED] Betreff: RE: Reading from a filehandle in while-loop David le

Reading from a filehandle in while-loop

Why does this don´t work in my Script? open (TEST, /tmp/test.txt); while (TEST) { print $_; # or just print; } -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

AW: Reading from a filehandle in while-loop

Joop, if I use open... or die $! i see that the file is opened correctly but nothing is in $_. -Ursprngliche Nachricht- Von: Flemming Greve Skovengaard [mailto:[EMAIL PROTECTED] Gesendet: Dienstag, 26. Oktober 2004 11:45 An: [EMAIL PROTECTED] Cc: Bastian Angerstein Betreff: Re

Perl/TK Development Suite/Gui

Hi, I am looking for a free (graphic) development tool for building perl/tk applications. It should run under AIX and/or Linux. If anybody knows a good tool, with something like a tk gui-painter tell me, please. Thanks Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

can´t call method xyz on an undefined value at...

Good Morning, I, once again, have a question. How can I check if a Method is undefined or not without getting this error? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

can´t call method xyz on an undefined value at...

Now I gate can´t call methode can on an undefined value xyz line xyz. Any Idea? -Ursprüngliche Nachricht- Von: Charles K. Clarkson [mailto:[EMAIL PROTECTED] Gesendet: Freitag, 3. September 2004 10:37 An: 'Bastian Angerstein'; 'Mailinglist Perl Beginners' Betreff: RE: can´t call method

Code in Variable ausführen?

Hello, is it possible to execute code that is within a var? like: $var = 'print Hallo Welt\n'; I had seen something like that in compination with eval... but I can´t remeber where and I can´t find that code anymore. Thanks Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

__DATA__ Token Question

Hello, some weeks ago I had a question regarding The DATA-Token. Now there is anonther one: Could I change the contens of the datatoken (filehandle) during the runtime of the skript? If anyone has an idea I would be grateful. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

AW: Counting characters in a thread

unless ($string =~ /%{0,10}/) { $string = undef; } -Ursprungliche Nachricht- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Gesendet: Freitag, 9. Juli 2004 13:21 An: [EMAIL PROTECTED] Betreff: Counting characters in a thread $string =

RE: __DATA__ Token Problem

-Ursprüngliche Nachricht- Von: John W. Krahn [mailto:[EMAIL PROTECTED] Gesendet: Dienstag, 6. Juli 2004 06:37 An: Perl Beginners Betreff: Re: __DATA__ Token Problem On Monday 05 July 2004 05:07, Bastian Angerstein wrote: Hello, Hello, I have a few questions regarding to the DATA

__DATA__ Token Problem

that the __DATA__ section is empty? Deutsche Telekom AG T-Com, Technische Infrastruktur Niederlassung Überregional Bastian Angerstein Network Support Center - Network Management Support Maybachstr.57; D-70469 Stuttgart +49 711 8939 1889 (Tel.) +49 711 8939 6604 (Fax) mailto:[EMAIL PROTECTED] http://www.t

Socket or NetServer::generic???

Hello, there I am progarmming a client server passed solution. My Question here ist which Modul I should use. I already noticed that the IO::Socket and the NetServer::Generic are both easy to use. My question is does a IO::Socket server handle multiple clients or not? Thank you, Bastian --

POD anyone with a good example???

Hello there, does anyone have a good example for pod documented sourcecode. I would like to have some sort of example where I can start with. Thanks, Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

How to get Interface IP using perl?

How to get Interface IP (DailUp Interface with nonstatic ip) using perl? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

How get a special value of an arrayfield stored in an hash?

I tought: $index = 1 $var = ${$myhash{mykey}}[$index]; would do the trick. But it don´t. Any suggestions? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Perl / Tk Gui Toolkit?

Hi has anybody expirience with GUI Toolkit for Perl/Kit? Which would you recommend for Solaris or Windows? Thanks Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Maybe Stupid RegEx Question

Hi I have two strings 0x1479ee und 0x1479fe. The strings a in $var1 and $var2. if I do: if ( $var2 =~ /\Q$var1\E/) It matches. how can I match an the string and not on each sign? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: FW: special vars

It is important believe me. Especialy if you are writting to logfiles, databases and unix named pipes. If in this context buffered io is on it will happen that if you prints something to a file or anywhere not the whole line is dumped only the stuff what was in the buffer when the buffer was

How to sort hashkeys by numbersize??

I got the following Problem: My hashkeys looks like number:string . For example 10530:fileparameter-sa1 10529:fileparameter-mv1 10531:fileparameter-tx4 (without the signs...) I would like to sort the hashkeys by the number before the doublepoint. Any Idea? Thx,

Re: Re: How t o sort haskeys by numbersize??

Thank´s a lot people! Have a nice day, Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

How to work with 64 Bit unsinged Intergers or Network formatted numbers.

Hello, I am working with SNMP and 64 Bit unsigned Intergers. To give you a view on the different possible values and types I come across: 2147483648 = 1000 = 8000 = 2^31 4294967296 = 1 = 1 = 2^32 4294967295 =

Hash with Arraykey

Hello, I have a Hash of Data. The Key lies in an Array of on Array of Arrays or something like that. How do I use it??? if ($myhash{$ArrayOfKeys[2][4][1]}){ print soo\n; } or if ($myhash{$ArrayOfKeys[2][4][1]}){ print joo\n; } or how? Thanks! -- To unsubscribe, e-mail: [EMAIL

How to alarm under 1 second?

Hello, I have aquestions. If I need an alarm signal alarm(), in less than 1 second what can I do? Would that work? sub selfalarm { $waittime = @_; if ($pid = fork){ } else { $ppid = getppid(); select (undef,undef,undef, $waittime); kill 14 = ppid; } } SIG{ALRM} =

Thread enabled?

Hi, how can I check if my perl is thread enabled? I ´m using 5.6.1. Which Modul to use and where to find? (if not cpan) use threads or use Thread? Which is which? Thanx! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Can I read nonblocking from a FIFO / PIPE?

Hello there! I have a question regarding named pipes (mknod mypipe p). I have 2 programmes, one is not opensource nor programmed by me. The 2. programm is programmed by me. The 1. writes into a pipe. The 2. should read from the pipe. So far so good. The problem is if the first programm can´t

Can I read nonblocking from a FIFO / PIPE?

Hello there! Sorry, if you get this mail two time. I have a question regarding named pipes (mknod mypipe p). I have 2 programmes, one is not opensource nor programmed by me. The 2. programm is programmed by me. The 1. writes into a pipe. The 2. should read from the pipe. So far so good. The

IO::Getline Methode

...already searched cpan. Has anybody an idea where I can get the Modul or Methode IO::Getline or IO::Getlines Are they only in Perl 5.8? (I am using 5.0) Thx, Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

How to add a value to an array in a hash?

Hello there, I have / or want to have an hash of arrays. @{ $hash{$key}} And I want to add an value to different fields of the array. Is this the way it works?? @{ $hash{$key}}[0] = Bastian; @{ $hash{$key}}[1] = Ang; @{ $hash{$key}}[2] = Next Door; @{ $hash{$key}}[3] = to Alice; Or

HELP: How to translate ASCII-CODE to ASCII-Charakters

Hello, I have a stupid Problem: I have to translate a lot of ASCII-Codenumbers (49,54,110) into Charakters. How can I do this? Do I have to make a if ($number == 49){ print ']';} Or is there an better, faster, smarter way. I could not find anything about that, maybe there is a possibility

CGI for ftp?

Hello, I am searching for an Perl/CGI for up/downloading and editing files on an ftp-server via http-interface. Has somebody made such a programm? I made a programm for editing files on the server via http. Thanks. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands,

perl 5.8.0 for AIX 4.3.3

Anyone here who has the binary files of perl 5.8 for AIX 4.3.3? Any idea where I can get the bins? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: perl 5.8.0 for AIX 4.3.3

On Tue, 24 Sep 2002, Angerstein wrote: Anyone here who has the binary files of perl 5.8 for AIX 4.3.3? Any idea where I can get the bins? If you want to build from the source files (recommended approach) http://www.cpan.org/src/stable.tar.gz This is the link for binaries http

how to find memory leaks?

Hi, I have a deamon like programm, which runs tasks at give timestamps. This is in a while (1) {} if startjobx == time loop. Now i have the problem that one or more of my datastructures eats more and more memory. I delete every value after using it from my hashes or array from arrays, but it

WG: how to find memory leaks?

-Ursprüngliche Nachricht- Von: Angerstein [mailto:[EMAIL PROTECTED]] Gesendet am: Freitag, 20. September 2002 09:30 An: [EMAIL PROTECTED] Betreff: how to find memory leaks? Hi, I have a deamon like programm, which runs tasks at give timestamps. This is in a while (1) {} if startjobx

Arg... what about $#hash $#array

I noticed if I want to print out the number of elements which should be stored in $#hash, but if i print it out i just get -1 !! What else can i do??? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: Arg... what about $#hash $#array

ok... scalar (@array); scalar (%hash); can be used to get the number of elements. -Ursprüngliche Nachricht- Von: Angerstein [mailto:[EMAIL PROTECTED]] Gesendet am: Freitag, 20. September 2002 11:12 An: [EMAIL PROTECTED] Betreff: Arg... what about $#hash $#array I noticed if I

is every sub know to a child?

I have a programm build with a lot of subs. Normally it should be possible to call every declared sub in the (fork) child process, right? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

What is a thread?

Hi, a simple question: if my program starts a thread, does it wait until the thread finishes or do it run futher? Other harder question: if I fill an array or other complex datastructure is it a pain in the neck to give it over to the main-prog, (like it is with processes...) or is it easy?

AW: how to initialise a two dimensional array

just: $hereiam[0][0] = Things; $hereiam[0][1] = Eye ; $hereiam[0][2] = always; $hereiam[0][3] = wanted ; $hereiam[1][0] = blahhh; $hereiam[1][1] = blahh; $hereiam[1][2]= blah; -Ursprüngliche Nachricht- Von: Nikola Janceski [mailto:[EMAIL PROTECTED]] Gesendet am: Mittwoch, 18.

lots of numbers...

if you have a list of numbers: 67, 50, 78, 12, 19, 98, 33, 55, 10, 8, 39, 48, 13, 70, 36, 87, 82, 44, 32, 78, 9, let´s say you have 500 numbers of the range between 10 and 100. What you really want are groups each with 3 numbers. The summe of the numbers in a group should be near as

Time::HiRes

Has anyone used it? How exact is it? Any experience? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: Perl 5.8.0

full 64Bit support -Ursprüngliche Nachricht- Von: Jason Frisvold [mailto:[EMAIL PROTECTED]] Gesendet am: Donnerstag, 29. August 2002 23:02 An: [EMAIL PROTECTED] Betreff: Perl 5.8.0 Ok, I'm a bit behind the times... :-) What are the major advantages (if any) to moving to 5.8.0?

AW: find the lowest number?

@numbers = (44, 55, 38, 10 , 5, 7); @numbers = sort { $a=$b } @number; print $numbers[0]; # the lowest -Ursprüngliche Nachricht- Von: David Samuelsson (PAC) [mailto:[EMAIL PROTECTED]] Gesendet am: Freitag, 30. August 2002 10:23 An: '[EMAIL PROTECTED]' Betreff: find the lowest

AW: find the lowest number?

@numbers[$#numbers]; # highest @numbers[-1]; # highest -Ursprüngliche Nachricht- Von: Angerstein [mailto:[EMAIL PROTECTED]] Gesendet am: Freitag, 30. August 2002 10:34 An: [EMAIL PROTECTED] Betreff: AW: find the lowest number? @numbers = (44, 55, 38, 10 , 5, 7); @numbers = sort

AW: find the lowest number?

sort will sort like windows does with filename if you do this that way. example sort do: 1, 16, 20, 3, 35, 4, 400 not: 1,3,4,16,20,35,400 -Ursprüngliche Nachricht- Von: Ramprasad A Padmanabhan [mailto:[EMAIL PROTECTED]] Gesendet am: Freitag, 30. August 2002 10:39 An: [EMAIL

AW: find the lowest number?

fake! you dont need to sort the array to times... because u know where the lowest hand the higest is. Less of the half of 11 wallclocks would be what i expect. -Ursprüngliche Nachricht- Von: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Gesendet am: Samstag, 31. August 2002 04:11 An:

AW: AW: find the lowest number?

ok, i see. That´s what i thought. -Ursprüngliche Nachricht- Von: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Gesendet am: Samstag, 31. August 2002 04:33 An: Perl beginners Betreff: Re: AW: find the lowest number? On Fri, 30 Aug 2002, Angerstein wrote: fake! you dont need

make an executable File / compile perl

Hi, I have a perlscript using quite some modules. Therefor that I use AIX in different Versions the path of perl, and even the installed modules differs from server to server. The main problem is AIX with compiler is more expensive than without so the most costumers have servers without an

How to unshift to an array in an array of arrays?

How to unshift to an array in an array of arrays? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: How to unshift to an array in an array of arrays?

Nachricht- Von: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Gesendet am: Mittwoch, 28. August 2002 23:23 An: Perl beginners Betreff: Re: How to unshift to an array in an array of arrays? On Wed, 28 Aug 2002, Angerstein wrote: How to unshift to an array in an array of arrays? Something

Problems with SNMP::Multi

Hello, I have some Questions regarding SNMP::Multi. Does someone have some more documentated Examples? I need pairs of the $result-values and the corresponding $result-varlist item; For example: myrouter.mynet.com: .1.3.6.1.2.1.2.2.1.5.5 = 1550 It would be perfect if I could get the type

use Variable as a hashname?

Hello, can I / how can I use a variable as a hash name? $$myVar{key}? Thanxs! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: use Variable as a hashname?

- Von: Connie Chan [mailto:[EMAIL PROTECTED]] Gesendet am: Montag, 26. August 2002 13:38 An: Angerstein; [EMAIL PROTECTED] Betreff: Re: use Variable as a hashname? $x = 'key'; %Y = (); $Y{$x} = 10; print $Y{key}; # You got 10; Rgds, Connie - Original Message - From

AW: how to make a regex for a ip address

What about: /\d?\d?\d\.\d?\d?\d\.\d?\d?\d\.\d?\d?\d\/ or @ip = split (/\./); foreach $part (@ip) { if ( $part 255 $part =~ /\d?\d?\d\/ ) { die That´s not an IP; } } -Ursprüngliche Nachricht- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]Im Auftrag

AW: AW: how to make a regex for a ip address

]] Gesendet am: Dienstag, 20. August 2002 15:02 An: Angerstein Cc: [EMAIL PROTECTED] Betreff: Re: AW: how to make a regex for a ip address /^(?:0*(?:2(?:[0-4]\d|5[0-5])|1?\d{1,2})(?:\.|$)){4}/ -Samy Angerstein wrote: What about: /\d?\d?\d\.\d?\d?\d\.\d?\d?\d\.\d?\d?\d\/ or @ip = split

AW: Is there a way to do cron on windows?

You can create services that runs on defined times. try windowshelp -- scheduler -Ursprüngliche Nachricht- Von: Daryl J. Hoyt [mailto:[EMAIL PROTECTED]] Gesendet am: Dienstag, 20. August 2002 16:05 An: Beginners Perl Betreff: Is there a way to do cron on windows? Hi all, I

AW: AW: how to make a regex for a ip address

yes, correctly -Ursprüngliche Nachricht- Von: Mat Harris [mailto:[EMAIL PROTECTED]] Gesendet am: Dienstag, 20. August 2002 16:07 An: Angerstein Cc: [EMAIL PROTECTED] Betreff: Re: AW: how to make a regex for a ip address the addresses x.x.x.255 and x.x.x.254 are not valid

AW: Is there a way to do cron on windows?

sorry, today it´s the Taskplaner -Ursprüngliche Nachricht- Von: Angerstein [mailto:[EMAIL PROTECTED]] Gesendet am: Dienstag, 20. August 2002 16:16 An: Daryl J. Hoyt Cc: [EMAIL PROTECTED] Betreff: AW: Is there a way to do cron on windows? You can create services that runs

AW: AW: how to make a regex for a ip address

in error, please notify us by telephone or email (to the numbers or address above) immediately. -Original Message- From: Nikola Janceski [mailto:[EMAIL PROTECTED]] Sent: Tuesday, August 20, 2002 14:13 To: Nikola Janceski; 'Samy Kamkar'; 'Angerstein' Cc: '[EMAIL PROTECTED

Idea about childs...

I have a child and a parent process. Both should die if the other has ended. i tried with kill(0,$pib); while (kill(0,$pib)){ } in the parentprocess and with $parentpid = getppid(); while (kill(0,$parentpid)){ } in the child. I also tried: $parentpid = getppid();

AW: Uptime on Remote computer?

You need one of the following modules: net::snmmp udc::snmp (now net-snmp, little confusing) and you need an mib-browser (xnmbrowser for example). Both Modules are well documented, net::snmp is harder to use but i trust it the most. Download the Modules and view the examples.

getppid?

Hello, can somebody tell me what value getppid has (in the child) if the parent process has ended? I could not find an answer to this. I guess its 1 or 0, but not sure. Thanks Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

AW: Editor

I really love nedit. -Ursprüngliche Nachricht- Von: Scott Barnett [mailto:[EMAIL PROTECTED]] Gesendet am: Mittwoch, 31. Juli 2002 15:44 An: [EMAIL PROTECTED] Betreff: Editor Hi, I am new to Perl just over a month now. I have tried other programming languages and they just seem

Problem with Net::Ping

Hello, I wrote a big skript which uses net::ping (ping.pm) (and tk). I noticed that the resultes of Net::Ping are not identical to the system commad ping. Much more Items are not reachable over Net::Ping then they are over the system command. I can´t explain why. (Even after rewriting 500 lines

What Modul for use with imap?

Hello, I have a short Question, which module can I use to work with imap-email? Big thanks for helping me out. Bastian -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Pattern-Matching var - interpolation.

Hello, I have a very unfunny problem, on which i am working for hours. I need to find out if a string contains an other specified string. I want to use pattern-matching. I can´t get a match together which make this. Look at my examples, none of the Matchings using vars works. If I replaces the