Making regex's

2009-02-10 Thread Dermot
Hi, I just hit something that I hadn't noticed before and I am not sure it's it's a syntax issue or I have not been doing my reading. I am trying to create a regex to match a directory name in path string my $dir = dirname(shift); (my $code) = ($dir =~ m|track.(\w{3}).|); return $code; I

Re: accessing remote registry

2009-02-10 Thread Jenda Krynicky
> > From: perl pra > > > Can anybody help in accessing the registry of remote windows machine and > > get > > > the keys in the folder *HKEY_LOCAL_MACHINE/SOFTWARE * > > > ** > > > I have tried using win32::Registry, but i am getting the error "cannot > > open > > > the registry",But the same scr

Re: Making regex's

2009-02-10 Thread John W. Krahn
Dermot wrote: Hi, Hello, I just hit something that I hadn't noticed before and I am not sure it's it's a syntax issue or I have not been doing my reading. I am trying to create a regex to match a directory name in path string my $dir = dirname(shift); (my $code) = ($dir =~ m|track.(\w{3

Re: bash in perl

2009-02-10 Thread Nikhil Babu
Hi, you can very well try the following $x = ENV{'PWD'}; this reads the present working directory from the $PWD environment variable. On Feb 7, 6:59 pm, pouliakh...@gmail.com (Pouliakhina) wrote: > Hello, > > I try to write the name of the current directory in $x: > > $x = system ("pwd"); > >

Re: rsh shell command hangs and does not return

2009-02-10 Thread Ice Man
On Feb 7, 9:40 am, wjharris...@optonline.net (Ice Man) wrote: > On Feb 7, 7:17 am, chas.ow...@gmail.com (Chas. Owens) wrote: > > > > > On Fri, Feb 6, 2009 at 14:31, Ice Man wrote: > > > Ok . so I have to start a program which is written in java. > > > > #!/local/bin/perl > > > > my $command =

Re: how to delay printing without over working perl

2009-02-10 Thread David Shere
On Tue, 2009-02-10 at 07:39 +0800, itshardtogetone wrote: > I then wonder are there any other better ways for me to do this. If you need a delay in your code, use the sleep command: sleep 5; # five second delay -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands

Re: Making regex's

2009-02-10 Thread Dermot
2009/2/10 John W. Krahn : > Dermot wrote: >> >> Hi, > > Hello, > >> I just hit something that I hadn't noticed before and I am not sure >> it's it's a syntax issue or I have not been doing my reading. >> >> I am trying to create a regex to match a directory name in path string >> Is that right? >

Re: rsh shell command hangs and does not return

2009-02-10 Thread Chas. Owens
On Tue, Feb 10, 2009 at 05:40, Ice Man wrote: snip > A bit of a quagmire here. Seems open2 /open3 are not available to me > at work. > A little frustrated here. Are there any other alternatives? snip IPC::Open2 and IPC::Open3 are part of Core Perl and have been since the first version of Perl 5

Re: bash in perl

2009-02-10 Thread Chas. Owens
On Tue, Feb 10, 2009 at 04:03, Nikhil Babu wrote: > Hi, > > you can very well try the following > > $x = ENV{'PWD'}; > > this reads the present working directory from the $PWD environment > variable. snip Relying on environment variables is as bad as calling external programs. The Cwd module is

Re: how to delay printing without over working perl

2009-02-10 Thread Chas. Owens
On Mon, Feb 9, 2009 at 18:39, itshardtogetone wrote: > Hi, > Looking at the script below, I wish to print out "line 1" first, which is > after the while loop, then followed by "First loop", and then "Second loop", > henceforth I have the script below. What I did was to hold on the printing of >

copy 3D array to 2D array

2009-02-10 Thread Rob Canning
hi, i am trying to copy a three dimensional array to a two dimentional one this: @AoA = ( [2, 3], [4, 5, 7], [0] ); to this @A = qw(2 3 4 5 7 0); i know the answer is staring at me in perldoc perldsc but i cant see it! thanks rob -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org F

Re: copy 3D array to 2D array

2009-02-10 Thread Chas. Owens
On Tue, Feb 10, 2009 at 11:13, Rob Canning wrote: > hi, > > i am trying to copy a three dimensional array to a two dimentional one > > this: > > @AoA = ( [2, 3], [4, 5, 7], [0] ); > > to this > > @A = qw(2 3 4 5 7 0); > > i know the answer is staring at me in perldoc perldsc but i cant see it! sni

Re: Making regex's

2009-02-10 Thread Gunnar Hjalmarsson
Dermot wrote: I am trying to create a regex to match a directory name in path string my $dir = dirname(shift); (my $code) = ($dir =~ m|track.(\w{3}).|); return $code; An unescaped . in a regex matches any character except a newline. I suppose you meant m|track\.(\w{3})\.| -- Gunnar Hj

Re: rsh shell command hangs and does not return

2009-02-10 Thread Rob Dixon
Chas. Owens wrote: > > perl -MIPC::Open2 -le 'print ok' That will be perl -MIPC::Open2 -le 'print "ok"' Rob -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: How hard is it to learn this langauge?

2009-02-10 Thread Rob Dixon
Blazer wrote: > > I have limited experience of programming in C & C++ - I cant claim to > know either of these well, but i do try to keep building on what i > know, when i can. I just kept reading that Perl was a very easy > language to learn. Is this true or is it propaganda??? > > All I know is

Re: rsh shell command hangs and does not return

2009-02-10 Thread Chas. Owens
On Feb 10, 2009, at 19:51, Rob Dixon wrote: Chas. Owens wrote: perl -MIPC::Open2 -le 'print ok' That will be perl -MIPC::Open2 -le 'print "ok"' Rob While that will work, it isn't necessary. The strict pragma is not in force, so the bareword ok is the same as the string "ok" (since

Re: rsh shell command hangs and does not return

2009-02-10 Thread Chas. Owens
On Tue, Feb 10, 2009 at 21:16, Chas. Owens wrote: > > > On Feb 10, 2009, at 19:51, Rob Dixon wrote: > >> Chas. Owens wrote: >>> >>> perl -MIPC::Open2 -le 'print ok' >> >> That will be >> >> perl -MIPC::Open2 -le 'print "ok"' >> >> Rob > > While that will work, it isn't necessary. The strict prag