Hi,
Actually we are working in the telecom industry, so our work resolves
parsing the raw CDRs generated from the telecom switch(the format is ASN.1)
. Till now it is being done through JAVA, but some requirement creeps in
where we need to parse those CDRs through perl and convert those files into
On Mon, Jun 16, 2008 at 22:13, Jeff Peng <[EMAIL PROTECTED]> wrote:
> Dr.Ruud 写道:
>>
>> Rick Bragg schreef:
>>
>>> Is there a reason why the reply-to on this mailing list is set to go
>>> back to the poster and not back to the list? I think its best for a
>>> list like this to keep all the message
Dr.Ruud 写道:
Rick Bragg schreef:
Is there a reason why the reply-to on this mailing list is set to go
back to the poster and not back to the list? I think its best for a
list like this to keep all the messages on the list, so when I reply,
I need to manually put in the beginners@perl.org addres
On Tue, 2008-06-17 at 00:29 +0200, Dr.Ruud wrote:
> Rick Bragg schreef:
> > Dr.Ruud:
> >> Rick Bragg:
>
> >>> Is there a reason why the reply-to on this mailing list is set to go
> >>> back to the poster and not back to the list? I think its best for a
> >>> list like this to keep all the message
Rick Bragg schreef:
> Dr.Ruud:
>> Rick Bragg:
>>> Is there a reason why the reply-to on this mailing list is set to go
>>> back to the poster and not back to the list? I think its best for a
>>> list like this to keep all the messages on the list, so when I
>>> reply, I need to manually put in th
On Mon, 2008-06-16 at 22:25 +0100, Rob Dixon wrote:
> Rick Bragg wrote:
> >
> > Thanks again, Rob,
> >
> > I'm afraid that this issue is still not going away,
>
> It won't go away at a stroke. You are installing a huge Perl library with
> external dependencies, and there are many places for it t
William wrote:
>> use strict;
>> use warnings;
>>
>> use Devel::Peek qw/Dump/;
>>
>> my $numstr = sprintf("%4d", 1234);
>> Dump $numstr;
>>
>> $numstr = sprintf("%05d", 1234);
>> Dump $numstr;
>>
>> my $num = sprintf("%05d", 1234);
>> $num += 0;
>> Dump $num;
>>
>> **OUTPUT**
>>
>> SV = PV(0x365ec)
Rob Dixon schreef:
> Dr.Ruud:
>> Rob Dixon:
>>> A scalar cannot have multiple 'personalities' - it can have a
>>> maximum of two (its inherent type and a string equivalent) at any
>>> one time, but usually has only one.
>>
>> It can at least have 3: an integer numeric one, a floating numeric
>> on
Dr.Ruud wrote:
> Rob Dixon schreef:
>
>>> Maybe the other modules that you use, have Data::Dumper embedded?
>> [...]
>>
>> Now I've been specific: all of those things were untrue.
>
> What can be wrong about a "maybe"?
We're not talking about 'maybe there is a God' here, this is 'maybe pigs fly
Rick Bragg wrote:
>
> Thanks again, Rob,
>
> I'm afraid that this issue is still not going away,
It won't go away at a stroke. You are installing a huge Perl library with
external dependencies, and there are many places for it to go wrong.
> Here is the results of the "perl Makefile.PL" in cpan
Dr.Ruud wrote:
> Rob Dixon schreef:
>> Dr.Ruud:
>
>>> There is no real way to test if a value inside a variable has a
>>> numeric "personality". [...]
>> There is indeed a simple way to test in Perl whether a scalar value
>> is being treated as a string
>
> I stated something about numeric, you a
On Mon, 2008-06-16 at 22:00 +0200, Dr.Ruud wrote:
> Rick Bragg schreef:
>
> > Is there a reason why the reply-to on this mailing list is set to go
> > back to the poster and not back to the list? I think its best for a
> > list like this to keep all the messages on the list, so when I reply,
> >
On Mon, 2008-06-16 at 20:47 +0100, Rob Dixon wrote:
> Rick Bragg wrote:
> > On Mon, 2008-06-16 at 17:26 +0100, Rob Dixon wrote:
> >> Rick Bragg wrote:
> >>> On Mon, 2008-06-16 at 16:12 +0100, Rob Dixon wrote:
> Rick Bragg wrote:
> > Hi,
> >
> > I am fairly new at using cpan, Here i
Gunnar Hjalmarsson schreef:
> I don't
> see how the fact that you posted it would motivate your introducing of
> non-greediness in the first suggestion.
I injected the "non-greediness" for educational reasons. It was a bit
wasted on the OP, who couldn't find his way in perlre.
My experience is th
Rick Bragg schreef:
> Is there a reason why the reply-to on this mailing list is set to go
> back to the poster and not back to the list? I think its best for a
> list like this to keep all the messages on the list, so when I reply,
> I need to manually put in the beginners@perl.org address in th
Dr.Ruud wrote:
> Rob Dixon schreef:
>
>> A scalar cannot have multiple 'personalities' - it can have a maximum
>> of two (its inherent type and a string equivalent) at any one time,
>> but usually has only one.
>
> It can at least have 3: an integer numeric one, a floating numeric one,
> and a st
Rick Bragg wrote:
> On Mon, 2008-06-16 at 17:26 +0100, Rob Dixon wrote:
>> Rick Bragg wrote:
>>> On Mon, 2008-06-16 at 16:12 +0100, Rob Dixon wrote:
Rick Bragg wrote:
> Hi,
>
> I am fairly new at using cpan, Here is an error that I got when trying
> to install Tie::Watch.
>
Dr.Ruud wrote:
Gunnar Hjalmarsson schreef:
Dr.Ruud:
Ravi Malghan:
I want to extract data between the first parenthesis and the last
in the below variable.
$OrigString =
"REQUEST(SERVICE,1DJGHKDFJGHDFJGHKDFJH\nDFJHGDFJHGJDFHGJKDFHG\nHGJDFHGJK
DFHGJKDFHGJKDFH);";
$OrigString =~ m/REQUEST\(
ken uhl wrote:
Thanks for replying Gunnar,
Gunnar Hjalmarsson wrote:
ken uhl wrote:
my Forms are not "acting" nicely, page to page flow is not correct,
Page one prompts for search criteria:
...
$scriptname = $q->script_name();
...
...
The submit button goes nicely to second page resu
Gunnar Hjalmarsson schreef:
> Dr.Ruud:
>> Ravi Malghan:
>>> I want to extract data between the first parenthesis and the last
>>> in the below variable.
>
>
>
>>> $OrigString =
>>>
"REQUEST(SERVICE,1DJGHKDFJGHDFJGHKDFJH\nDFJHGDFJHGJDFHGJKDFHG\nHGJDFHGJK
>>> DFHGJKDFHGJKDFH);";
>>> $OrigString =~
Rob Dixon schreef:
>> Maybe the other modules that you use, have Data::Dumper embedded?
> [...]
>
> Now I've been specific: all of those things were untrue.
What can be wrong about a "maybe"?
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additiona
Rob Dixon schreef:
> Dr.Ruud:
>> There is no real way to test if a value inside a variable has a
>> numeric "personality". [...]
>
> There is indeed a simple way to test in Perl whether a scalar value
> is being treated as a string
I stated something about numeric, you about string. Do you see th
Rob Dixon schreef:
> A scalar cannot have multiple 'personalities' - it can have a maximum
> of two (its inherent type and a string equivalent) at any one time,
> but usually has only one.
It can at least have 3: an integer numeric one, a floating numeric one,
and a string one. It can have more.
Rob Dixon schreef:
> Dr.Ruud:
>> Rob Dixon:
>> I am not sure which of the above you consider not true, so I'll show
>> it with a variant of your own code.
>
> without there being any 'above'.
Nonsense. I left exactly what I assumed you meant with your "That is not
true.". That is a basic function
Rick Bragg <[EMAIL PROTECTED]> wrote:
> Just curious,
>
> Is there a reason why the reply-to on this mailing list is set to go
> back to the poster and not back to the list? I think its best for a
> list like this to keep all the messages on the list, so when I reply, I
> need to manually
On Jun 15, 10:09 pm, [EMAIL PROTECTED] (William) wrote:
> Hello, if I use the sprintf function it would give me a number STRING, but
> not number, so I have to trick the string to become number by adding and
> subtracting the number with 1. Is there a better way than this ? I want it to
> be a n
> use strict;
> use warnings;
>
> use Devel::Peek qw/Dump/;
>
> my $numstr = sprintf("%4d", 1234);
> Dump $numstr;
>
> $numstr = sprintf("%05d", 1234);
> Dump $numstr;
>
> my $num = sprintf("%05d", 1234);
> $num += 0;
> Dump $num;
>
> **OUTPUT**
>
> SV = PV(0x365ec) at 0x3652c
> REFCNT = 1
Just curious,
Is there a reason why the reply-to on this mailing list is set to go
back to the poster and not back to the list? I think its best for a
list like this to keep all the messages on the list, so when I reply, I
need to manually put in the beginners@perl.org address in the To:
field...
On Mon, 2008-06-16 at 17:26 +0100, Rob Dixon wrote:
> Rick Bragg wrote:
> > On Mon, 2008-06-16 at 16:12 +0100, Rob Dixon wrote:
> >> Rick Bragg wrote:
> >>> Hi,
> >>>
> >>> I am fairly new at using cpan, Here is an error that I got when trying
> >>> to install Tie::Watch.
> >>>
> >>> cpan[15]> inst
Dermot wrote:
> Hi All,
>
> I have data in a tab delimited format like this (tabs might be lost in
> the formatting of the email).
>
> A456/959ScHe
> M920/1123 He
> D123/999ChFl
> D123/949AnFl
> S520/257 Sp
> T510/106 TePeHe
> T540/110 Te
> T875/1010
On Mon, Jun 16, 2008 at 4:14 PM, zentara <[EMAIL PROTECTED]> wrote:
> On Mon, 16 Jun 2008 00:04:31 +0430, [EMAIL PROTECTED] ("Francisco
> Valladolid") wrote:
>
>>Hi Folks.
>>
>>I need write a desktop app based on Perl, and need opinions about the
>>best GUI choice, for this purpose.
>>
>>I saw Qt f
Rick Bragg wrote:
> On Mon, 2008-06-16 at 16:12 +0100, Rob Dixon wrote:
>> Rick Bragg wrote:
>>> Hi,
>>>
>>> I am fairly new at using cpan, Here is an error that I got when trying
>>> to install Tie::Watch.
>>>
>>> cpan[15]> install Tie::Watch
>>> Running install for module 'Tie
Thanks for replying Gunnar,
to your first Q ; ' maybe I did swap name and value - - '
I don't see how that could make a difference if the param retrieval code
on the line following page print command
never is executed. -
I'll try swapping that around, and post results. The mystery of page
Dr.Ruud wrote:
> Rob Dixon schreef:
>
>> Please try to quote relevant parts of the posts you respond to
>> in future.
>
> I did, and I always do, and I'm proud of it. :)
I think that is a matter of opinion, and mine is that you do not. For instance,
no one has any idea what I said to prompt t
On Mon, 2008-06-16 at 16:12 +0100, Rob Dixon wrote:
> Rick Bragg wrote:
> > Hi,
> >
> > I am fairly new at using cpan, Here is an error that I got when trying
> > to install Tie::Watch.
> >
> > cpan[15]> install Tie::Watch
> > Running install for module 'Tie::Watch'
> > Runnin
On Mon, Jun 16, 2008 at 11:52 PM, Dermot <[EMAIL PROTECTED]> wrote:
> Hi All,
>
> I have data in a tab delimited format like this (tabs might be lost in
> the formatting of the email).
>
> A456/959ScHe
> M920/1123 He
> D123/999ChFl
> D123/949AnFl
> S520/257Sp
>
Hi All,
I have data in a tab delimited format like this (tabs might be lost in
the formatting of the email).
A456/959ScHe
M920/1123 He
D123/999ChFl
D123/949AnFl
S520/257Sp
T510/106 TePeHe
T540/110 Te
T875/1010 TeSc
T875/1050 TeSc
Rick Bragg wrote:
> Hi,
>
> I am fairly new at using cpan, Here is an error that I got when trying
> to install Tie::Watch.
>
> cpan[15]> install Tie::Watch
> Running install for module 'Tie::Watch'
> Running make for S/SR/SREZIC/Tk-804.028.tar.gz
> Has already been unwrappe
From: Rob Dixon <[EMAIL PROTECTED]>
> It is common practice in most languages to pass an additional implicit
> parameter
> to method calls. Class methods like BOA::Logger2->new will have the class name
> passed as the first parameter, whereas object methods like $logger->level will
> have the obje
From: "Anirban Adhikary" <[EMAIL PROTECTED]>
> Dear List
>
> Is there any way to conversion from binary file to ascii/text file in perl?
> is there any perl module which works like this?
- Is there any way to drive from village A to town B?
- Most probably yes, but unless you tell us what A and B
Hi,
I am fairly new at using cpan, Here is an error that I got when trying
to install Tie::Watch.
cpan[15]> install Tie::Watch
Running install for module 'Tie::Watch'
Running make for S/SR/SREZIC/Tk-804.028.tar.gz
Has already been unwrapped into directory /root/.cpan/build/T
Ravi Malghan wrote:
I read up some docs on perlre. I know what .* does. But couldn't
figure out what does .*? does.
That's also explained in "perldoc perlre". Look for "greedy" and
"greediness" in the section "Quantifiers". (But it's unnecessary in this
case IMO.)
Also in the variant you su
Dr.Ruud wrote:
Ravi Malghan schreef:
I want to extract data between the first parenthesis and the last
in the below variable.
$OrigString =
"REQUEST(SERVICE,1DJGHKDFJGHDFJGHKDFJH\nDFJHGDFJHGJDFHGJKDFHG\nHGJDFHGJK
DFHGJKDFHGJKDFH);";
$OrigString =~ m/REQUEST\((.*)\);/;
print "$1\n";
Read
Dear List
Is there any way to conversion from binary file to ascii/text file in perl?
is there any perl module which works like this?
Thanks & Regards in Advance
Anirban Adhikary
Dr. Rudd: Thank you. That worked. I read up some docs on perlre. I know what .*
does. But couldn't figure out what does .*? does. Can Someone explain what that
? does
Also in the variant you suggested what does [^)] inside the paranthesis do?
Thanks
Ravi
- Original Message
From: Dr.Ruud
On Mon, Jun 16, 2008 at 5:52 PM, sivasakthi <[EMAIL PROTECTED]> wrote:
>
> if we pass both array and hash to subroutine then how to retrieve and print
> the values?
>
Hi,
Under this case, you should use references. like:
my @arr = (1,2,3);
my %hash = (1,2,3,4);
mysub([EMAIL PROTECTED],\%hash);
On Fri, 2008-06-13 at 20:08 +0800, Jeff Peng wrote:
> On Fri, Jun 13, 2008 at 7:50 PM, sivasakthi <[EMAIL PROTECTED]> wrote:
> > Hi all,
> >
> > how can we pass hash to subroutine? and retrieving the hash in
> > subroutine to print values of hash.
> >
>
> Hello,
>
> Generally we use a reference.
Noah <[EMAIL PROTECTED]> asked:
> I need to a nice, sophisticate way to compare lines between
> two files.
Is the order of the lines relevant (i.e. source code, etc.)?
> I know that sorting can help in comparison process but still
> one file might have additional lines between the lines that
Rob Dixon schreef:
> Dr.Ruud:
>> Rob Dixon:
>>> Dr.Ruud:
That Data::Dumper prefers to print the numeric face of the
variable, if available, is a matter of choice inside the code of
Data::Dumper. Maybe the other modules that you use, have
Data::Dumper embedded?
>>>
>>> That is n
Rob Dixon schreef:
> Please try to quote relevant parts of the posts you respond to
> in future.
I did, and I always do, and I'm proud of it. :)
Next time you write "That is not true.", be specific!
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For
50 matches
Mail list logo