Re: Is unlink() supposed to provide an error message on failure?

2009-11-23 Thread C.DeRykus
On Nov 20, 6:04 am, pe...@psdt.com (Peter Scott) wrote: On Thu, 19 Nov 2009 18:44:51 -0600, brian d foy wrote: I've fixed this in commit 40ea6f68 to perl blead. The entry now reads: [...] On error, Cunlink will not tell you which files it could not remove. If you care about the files you

How to find which perl has called my program?

2009-11-23 Thread abhi jain
I want to know which perl has called my program. For Ex : If I call perl program as bellow. # /usr/bin/perl5.8.5 prog.pl I should get /usr/bin/perl5.8.5 # /usr/bin/perl5.8.8 prog.pl I should get /usr/bin/perl5.8.8 Thanks in advance Abhi Jain -- To unsubscribe, e-mail:

Regex to get last 3 digits of a number.

2009-11-23 Thread shadow52
Hey everyone, I am trying to get just the last 3 numbers from the following number from perl using regexs but I have not had no success so I was hoping that I could get a little help on this. I just ordered the regex book from oreilly so that hopefully in the future I will not have to ask a

how to write a debug-print sub with one argument?

2009-11-23 Thread Mark_Galeck
Hello, I want to write a simple debug-print subroutine, which you could call like this: $foobar = foobar; dbgPrint foobar; and it would print the variable name and value. I came up with the following: sub dbgPrint { my $arg = $_[0]; my @up = caller;

答复: Regex to get last 3 digits of a number.

2009-11-23 Thread gaochong
substr but you have to set it to be char . can I help you ? -邮件原件- 发件人: shadow52 [mailto:ras.collec...@gmail.com] 发送时间: 2009年11月23日 11:27 收件人: beginners@perl.org 主题: Regex to get last 3 digits of a number. Hey everyone, I am trying to get just the last 3 numbers from the

Re: How to find which perl has called my program?

2009-11-23 Thread Shawn H Corey
abhi jain wrote: I want to know which perl has called my program. For Ex : If I call perl program as bellow. # /usr/bin/perl5.8.5 prog.pl I should get /usr/bin/perl5.8.5 # /usr/bin/perl5.8.8 prog.pl I should get /usr/bin/perl5.8.8 Thanks in advance Abhi Jain The version is

Re: Regex to get last 3 digits of a number.

2009-11-23 Thread Shawn H Corey
shadow52 wrote: Hey everyone, I am trying to get just the last 3 numbers from the following number from perl using regexs but I have not had no success so I was hoping that I could get a little help on this. I just ordered the regex book from oreilly so that hopefully in the future I will

Re: Regex to get last 3 digits of a number.

2009-11-23 Thread Rob Coops
On Mon, Nov 23, 2009 at 4:27 AM, shadow52 ras.collec...@gmail.com wrote: Hey everyone, I am trying to get just the last 3 numbers from the following number from perl using regexs but I have not had no success so I was hoping that I could get a little help on this. I just ordered the regex

Re: how to write a debug-print sub with one argument?

2009-11-23 Thread Rob Coops
On Mon, Nov 23, 2009 at 8:36 AM, Mark_Galeck mark_galeck_spam_mag...@yahoo.com wrote: Hello, I want to write a simple debug-print subroutine, which you could call like this: $foobar = foobar; dbgPrint foobar; and it would print the variable name and value. I came up with the following:

dcc chat example

2009-11-23 Thread Kammen van, Marco, Springer SBM NL
Hi All, I've been looking at this for ages. Does anyone have a working script or example of how to use a dcc chat while already connected to a irc server. Without the use of additional modules like Net::IRC. I guess I need to use either IO::Multiplex or IO::Select but I can't get it to

Re: how to write a debug-print sub with one argument?

2009-11-23 Thread Philip Potter
2009/11/23 Mark_Galeck mark_galeck_spam_mag...@yahoo.com: Hello,  I want to write a simple debug-print subroutine, which you could call like this: $foobar = foobar; dbgPrint foobar; One problem with your interface is it breaks under use strict;. You should always use strict and use warnings

Re: Regex to get last 3 digits of a number.

2009-11-23 Thread John W. Krahn
shadow52 wrote: Hey everyone, Hello, I am trying to get just the last 3 numbers from the following number from perl using regexs but I have not had no success so I was hoping that I could get a little help on this. I just ordered the regex book from oreilly so that hopefully in the future I

Re: How to find which perl has called my program?

2009-11-23 Thread Peter Scott
On Mon, 23 Nov 2009 08:10:48 -0500, Shawn H Corey wrote: abhi jain wrote: I want to know which perl has called my program. For Ex : If I call perl program as bellow. # /usr/bin/perl5.8.5 prog.pl I should get /usr/bin/perl5.8.5 # /usr/bin/perl5.8.8 prog.pl I should get

Find out if a method calls another method

2009-11-23 Thread Steve Bertrand
Hi everyone, I'm curious to know if there is an easy way to scan a list of module files and identify how many subs are calling a different specific sub. I've got a method that must be called once by each and every sub within the module. I want to ensure I haven't forgot to include its call

Re: 答复: the question of one program

2009-11-23 Thread Jenda Krynicky
From: Philip Potter philip.g.pot...@gmail.com 2009/11/20 gaochong zjgaoch...@gmail.com: Thanks . But the code is from cpan.org ,and is crappy ,where I will go ? CPAN has no quality control. There is no guarantee that anything you get from CPAN will not be, as you say, crappy. As a

Re: Find out if a method calls another method

2009-11-23 Thread Jay Savage
On Mon, Nov 23, 2009 at 11:08 AM, Steve Bertrand st...@ibctech.ca wrote: Hi everyone, I'm curious to know if there is an easy way to scan a list of module files and identify how many subs are calling a different specific sub. I've got a method that must be called once by each and every sub

Re: Regex to get last 3 digits of a number.

2009-11-23 Thread Dave Tang
On Mon, 23 Nov 2009 23:14:51 +1000, Shawn H Corey shawnhco...@gmail.com wrote: shadow52 wrote: [snip] The number is 0111 I was just wanting to get the last 3 digits from this number to be able to get an exact word phrase from my already loaded Hash table that I have created

Re: Regex to get last 3 digits of a number.

2009-11-23 Thread Dermot
2009/11/23 Dave Tang d.t...@imb.uq.edu.au: On Mon, 23 Nov 2009 23:14:51 +1000, Shawn H Corey shawnhco...@gmail.com Hi Shawn et al., I am also intrigued by the \z anchor. I had a look at perldoc perlreref and found \z  Match absolute string end My question is what is the difference

答复: Regex to get last 3 digits of a number.

2009-11-23 Thread gaochong
But I think substr is better . my $str=0111; my $r=substr ($str,-3); -邮件原件- 发件人: John W. Krahn [mailto:jwkr...@shaw.ca] 发送时间: 2009年11月日 23:23 收件人: Perl Beginners 主题: Re: Regex to get last 3 digits of a number. shadow52 wrote: Hey everyone, Hello, I am trying