Re: Matching ip to Network

2005-11-09 Thread A B
I think it could be easy if we will convert IP to number it will be enough. IP is A.B.C.D number could be (256*256*256+A)+(256*256+B)+(256+C)+D So, we have sub ip_to_int { my $inp = shift @_; $inp = ($inp =~ /\./) ? unpack("N", pack("C4", split(/\./,$inp))) : 0; return $inp; } Right now yo

Win32::MsgBox and background process

2005-11-09 Thread StoneBeat
Hi, i have a problem with Win32::MsgBox and background process, i have a daemonized program (runs in background) that shows error msgs with MsgBox and when prints the first pop-up its appears minimized but the other nexts, appears ok. The program runs compiled with -gui option of PDK 5.3 perla

Re: Matching ip to Network

2005-11-09 Thread $Bill Luebkert
Pierce, Glen E wrote: > I’m not sure where to start here. Does anyone have any ideas or a place > for me to begin to figure out how to see if an ip address is within an > ip address range? > > > > Eg. If 10.20.125.16 is in either > > > > 10.2[0-4].120.* or > > 10.2[0-4].12[0-9].*

Re: Array slicing applied to localtime?

2005-11-09 Thread Gisle Aas
Peter Scott <[EMAIL PROTECTED]> writes: > On Tue, 08 Nov 2005 22:42:16 -0800, Gisle Aas wrote: > > Peter Scott <[EMAIL PROTECTED]> writes: > > You may prefer this for readability: > >> > >> use Time::localtime; > >> ($dd, $mm, $yy) = (localtime->mday, localtime->mon, localtime->year); > > >

Matching ip to Network

2005-11-09 Thread Pierce, Glen E
I’m not sure where to start here.  Does anyone have any ideas or a place for me to begin to figure out how to see if an ip address is within an ip address range?   Eg. If 10.20.125.16 is in either   10.2[0-4].120.*  or 10.2[0-4].12[0-9].*  etc.   Thanks, Glen.     The H

Re: Tricking windows

2005-11-09 Thread JPerlmutter
Brian- maybe Pat gives you a deal, but over here vowels cost $ per appearance! (just kidding) Bill- "$Bill Luebkert" <[EMAIL PROTECTED]> wrote on 11/09/2005 02:12:06 PM: > [EMAIL PROTECTED] wrote: > > > There are essentially Four file systems involved in an issue I have and I > > think tha

Re: Tricking windows

2005-11-09 Thread $Bill Luebkert
[EMAIL PROTECTED] wrote: > There are essentially Four file systems involved in an issue I have and I > think that the issue may require tricking windows. > >>From a windows client, the program talks to an FSI card running Linux, > going through a proprietary RAID Array file systems that adds ov

Re: Tricking windows

2005-11-09 Thread $Bill Luebkert
Slight code change: Try this code (modify $start_dir to where you want it) : use strict; use warnings; use File::Path; my $base_dir = 'C:/fubar'; my $start_dir = 'C:/fubar/a1234567890'; mkpath $start_dir or die "mkpath $start_dir: $! ($^E)" if not -d $start_dir; my $len; my $dir = $start_dir; w

RE: Tricking windows

2005-11-09 Thread Brian Raven
[EMAIL PROTECTED] <> wrote: > There are essentially Four file systems involved in an issue I have > and I think that the issue may require tricking windows. > >> From a windows client, the program talks to an FSI card running >> Linux, > going through a proprietary RAID Array file systems that a

Re: Array slicing applied to localtime?

2005-11-09 Thread Peter Scott
On Tue, 08 Nov 2005 22:42:16 -0800, Gisle Aas wrote: > Peter Scott <[EMAIL PROTECTED]> writes: > You may prefer this for readability: >> >> use Time::localtime; >> ($dd, $mm, $yy) = (localtime->mday, localtime->mon, localtime->year); > > But this is actually wrong. With unluck the month mig

Tricking windows

2005-11-09 Thread JPerlmutter
There are essentially Four file systems involved in an issue I have and I think that the issue may require tricking windows. >From a windows client, the program talks to an FSI card running Linux, going through a proprietary RAID Array file systems that adds overhead, to a fourth, and second Li

Re: RegExp match '\w'

2005-11-09 Thread Williamawalters
In a message dated 11/8/2005 9:15:06 P.M. Eastern Standard Time, [EMAIL PROTECTED] writes:   > [EMAIL PROTECTED] wrote:> > >> It's a *negative* look-ahead assertion.  So it looks for a ; that isn't> >> preceded by a \.> > I meant to be non-greedy:   /^\s*insert:\s*(.*?(?!\\));/ but greed o