You might consider using Regexp::Common::net. It provides a convenient set
of functions for matching IP v4, v6 and mac addresses.
https://metacpan.org/pod/Regexp::Common::net
On Fri, 25 Oct 2019 at 19:43, John W. Krahn wrote:
> On 2019-10-25 3:23 a.m., Maggie Q Roth wrote:
> > Hello
>
> Hell
On 2019-10-25 3:23 a.m., Maggie Q Roth wrote:
Hello
Hello.
There are two primary types of lines in the log:
What are those two types? How do you define them?
60.191.38.xx/
42.120.161.xx /archives/1005
From my point of view those two lines have two fields, the first loo
/(?[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})\s+(?\/.*)/
To avoid the "leaning toothpick" problem, Perl lets use different match
delimiters, so the above is the same as:
m#(?[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})\s+(?/.*)#
I assume you want to capture the IP and the path, right?
if
That is a backslash followed by a forward slash. The backslash tells the
regex parser to treat the next character as a literal character. Useful for
matching periods, question marks, brackets, etc.
A period matches any character once and an asterisk matches the previous
character any number of time
my $n = '[0-9]{1,3}';
if ( =~ ( m[ (?:$n\.){3} $n \s+ \S+ ]x )
{
# match
}
On Fri, Oct 25, 2019 at 3:37 AM Maggie Q Roth wrote:
> what's V.*?
>
> Maggie
>
> On Fri, Oct 25, 2019 at 6:28 PM Илья Рассадин wrote:
>
>> For example, this regex
>>
>> /(?[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,
what's V.*?
Maggie
On Fri, Oct 25, 2019 at 6:28 PM Илья Рассадин wrote:
> For example, this regex
>
> /(?[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})\s+(?\/.*)/
>
> On 25.10.2019 13:23, Maggie Q Roth wrote:
> > Hello
> >
> > There are two primary types of lines in the log:
> >
> > 60.191.38.
For example, this regex
/(?[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})\s+(?\/.*)/
On 25.10.2019 13:23, Maggie Q Roth wrote:
Hello
There are two primary types of lines in the log:
60.191.38.xx /
42.120.161.xx /archives/1005
I know how to write regex to match each line, but do
On Wednesday 18 May 2011 12:25:52 ind...@students.itb.ac.id wrote:
> Dear all,
>
> I try to run this script to process my radar data, the script build by
> someone, I have asked him, but his advice can not help. This error message
> : ARGV error
> firstradar velx vely
>
> This is the Perl code:
>
> "S" == Saran writes:
S> Try something like
S> if(scalar(@ARGV) != 3) {
there is no need for scalar there. the != op provides a scalar context
so @ARGV will return its count.
uri
--
Uri Guttman -- u...@stemsystems.com http://www.sysarch.com --
- Perl Code Revie
Try something like
if(scalar(@ARGV) != 3) {
The above statement will execute if there is less than or greater than
three command line arguments..
~ Saran
On May 18, 2:37 pm, benignb...@gmail.com (Balachandran Sivakumar)
wrote:
> On Wed, May 18, 2011 at 2:55 PM, wrote:
> > ARGV error
> > first
On Wed, May 18, 2011 at 2:55 PM, wrote:
> ARGV error
> firstradar velx vely
>
>
> if(@ARGV != 3){
> print "ARGV error \n";
> print "firstradar velx vely \n";
> exit(1);
> }
>From what I see, this script expects command line arguments
and expects 3 arguments. So, you should run it someth
On 12/05/2011 10:23, Nathalie Conte wrote:
HI,
I have this file format
chr start end strand
x 12 24 1
x 24 48 1
1 100 124 -1
1 124 148 -1
Basically I would like to create a new file by grouping the start of the
first line (12) with the end of the second line (48) and so on
the output should lo
On Thu, May 12, 2011 at 11:23 AM, Nathalie Conte wrote:
HI,
I have this file format
chrstartendstrand
x 12241
x24481
1100124-1
1124148-1
Basically I would like to create a new file by grouping the start of the
first line (12) with the
On Thu, May 12, 2011 at 10:23:29AM +0100, Nathalie Conte wrote:
> I have this file format
> chrstartendstrand
> x 12241
> I have this script to split and iterate over each line, but I don't
> know how to group 2 lines together, and take the start of the firt line
> and
On Thu, May 12, 2011 at 6:23 AM, Nathalie Conte wrote:
> I have this script to split and iterate over each line, but I don't know
> how to group 2 lines together, and take the start of the firt line and the
> end on the second line? could you please advise? thanks
>
>
You have a couple of option
Nathalie Conte wrote:
HI,
Hello,
I have this file format
chr start end strand
x 12 24 1
x 24 48 1
1 100 124 -1
1 124 148 -1
Basically I would like to create a new file by grouping the start of the
first line (12) with the end of the second line (48) and so on
the output should look like thi
You are almost there :-)
my ($helper1, $helper2);
my $counter = 1;
foreach my $line(@list){
chomp $line;
my @coordinates = split(/' '/, $region);
my $chromosome = $coordinates[0];
my $start = $coordinates[1];
my $end = $coordinates[2];
my $strand = $coordinates[3
> "Matthew" == Matthew Young writes:
Matthew> What are closures? How are they used? When should they be used? Where
Matthew> can I learn more about them?
If you can borrow (or buy :) a copy of Intermediate Perl, I have an
entire section on closures in there.
--
Randal L. Schwartz - Stonehen
Matthew Young wrote:
I often read about closures being one of those 'end all beat all'
programming techniques reserved for the most sophisticated and
advanced gurus out there. Naturally, I want to learn how to use them,
and use them effectively - I know perl supports them! I know its a
sort of fu
Hi Matthew,
On Friday 12 November 2010 19:26:34 Matthew Young wrote:
> I often read about closures being one of those 'end all beat all'
> programming techniques reserved for the most sophisticated and
> advanced gurus out there. Naturally, I want to learn how to use them,
> and use them effective
> "SHC" == Shawn H Corey writes:
SHC> New-style Perl objects are written in Moose
don't claim moose is the only new style objects. nor are they the
ultimate as they have their issues too. plain old hash objects are fine
for most common classes and better in many cases too than complex
thi
From: 120
> I've looked at this:
>
> sub encrypt {
> my $self = shift;
> my $xx = $$self;
> #.. cut stuff I do understand
>
> return $self->SUPER::encrypt();
> }
>
> Could someone help me with the Perl to English here?
> I get that $self is shifting the arguement.
$self is se
120 wrote:
> On Sat, 2009-12-05 at 08:45 -0500, Someone Something wrote:
>> SUPER is a class that controls the superclass of the current class.
>> Look here: http://search.cpan.org/~chromatic/SUPER-1.17/lib/SUPER.pm
>>
>> So, what that means is, run the encrypt method/subroutine/function of
>> the
On Sat, 2009-12-05 at 08:45 -0500, Someone Something wrote:
> SUPER is a class that controls the superclass of the current class.
> Look here: http://search.cpan.org/~chromatic/SUPER-1.17/lib/SUPER.pm
>
> So, what that means is, run the encrypt method/subroutine/function of
> the superclass of the
SUPER is a class that controls the superclass of the current class.
Look here: http://search.cpan.org/~chromatic/SUPER-1.17/lib/SUPER.pm
So, what that means is, run the encrypt method/subroutine/function of
the superclass of the current class. Something I would highly
recommend is dive into Beginn
Christer Ekholm wrote:
> Steve Bertrand writes:
>
>> Umar Draz wrote:
>>> Hello Steve
>>>
>>> Thanks for your help.
>>>
>>> Would you please help me one thing more
>>>
>>> I have string e.g
>>>
>>> $str = "Hello this is my string (1020p0404), this string is not complete
>>> (1 034 400 3). now the
Steve Bertrand writes:
> Umar Draz wrote:
>> Hello Steve
>>
>> Thanks for your help.
>>
>> Would you please help me one thing more
>>
>> I have string e.g
>>
>> $str = "Hello this is my string (1020p0404), this string is not complete
>> (1 034 400 3). now the string complte";
>>
>> I want to
Umar Draz wrote:
> Hello Steve
>
> Thanks for your help.
>
> Would you please help me one thing more
>
> I have string e.g
>
> $str = "Hello this is my string (1020p0404), this string is not complete
> (1 034 400 3). now the string complte";
>
> I want to remove spaces form within ( ) not whol
On Thu, Jul 9, 2009 at 15:18, Umar Draz wrote:
> Dear User!
>
> I want to get all telephone and mobile number from a string and save into a
> variable. Here is my example what i am doing.
>
> #!/usr/bin/perl
>
> $str = "This is my string my mobile number is 0300-4459899, 042-8494949
> 041-8580880
Umar Draz wrote:
> Dear User!
>
> I want to get all telephone and mobile number from a string and save into a
> variable. Here is my example what i am doing.
>
> #!/usr/bin/perl
>
> $str = "This is my string my mobile number is 0300-4459899, 042-8494949
> 041-8580880 now the string is complete
Gowri Chandra Sekhar Barla, TLS, Chennai wrote:
>
> Please help me in rearranging line numbers in a file
>
> Example"
>
> File.txt
> 1 ghghjghjg
> 2 1hjkhkjh
> 3
> 4 .macro TTT offset
> 5 TTT 200
> 6 TTT 300
> 7 fghfghf
> 8 hjhjkhjkh
> 9 kgghjgg
>
> Output should be
>
> File.txt
> 1
Is this your homework???
On Fri, Nov 21, 2008 at 5:19 PM, Gowri Chandra Sekhar Barla, TLS, Chennai <
[EMAIL PROTECTED]> wrote:
>
> Hi all
>
> Please help me in rearranging line numbers in a file
>
> Example"
>
> File.txt
> 1 ghghjghjg
> 2 1hjkhkjh
> 3
> 4 .macro TTT offset
> 5 TTT 200
>
Thanks Chas Owens for your detailed explanation.
It helped me a lot
Thanks,
Thomas Reddy
-Original Message-
From: Chas. Owens [mailto:[EMAIL PROTECTED]
Sent: Friday, January 18, 2008 9:01 PM
To: Allam Reddy, Thomas
Cc: beginners@perl.org
Subject: Re: help me in reading the xml file
On
On Jan 18, 2008 2:45 PM, Andy Greenwood <[EMAIL PROTECTED]> wrote:
snip
> > $SIG{__DIE__} = sub {
> > open my $fh, ">>", "something.log"
> > or die @_, "could not open something.log: $!";
> > print $fh @_;
> > };
> >
> > die "Oops";
> >
>
> Would this not be susceptible to infinite
Chas. Owens wrote:
On Jan 17, 2008 9:54 AM, Jonathan Mast <[EMAIL PROTECTED]> wrote:
I want to write the errors caught by a 'die' clause into a file.
snip
Try
#!/usr/bin/perl
use strict;
use warnings;
$SIG{__DIE__} = sub {
open my $fh, ">>", "something.log"
or die @_, "c
On Jan 18, 2008 10:51 AM, Jonathan Mast <[EMAIL PROTECTED]> wrote:
snip
> > #!/usr/bin/perl
> >
> > use strict;
> > use warnings;
> >
> > $SIG{__DIE__} = sub {
> >open my $fh, ">>", "something.log"
> >or die @_, "could not open something.log: $!";
> >print $fh @_;
> > };
> >
> > die
On Jan 18, 2008 4:54 AM, Allam Reddy, Thomas <[EMAIL PROTECTED]> wrote:
> Hi Chas Owens,
>
> Thanks for your reply.
> Is there a way to parse and get the info from xml withou using
> XML::Twig?
snip
There are many XML parsing modules in Perl; unfortunately, none of the
are part of Core Perl. In f
Subject: Re: help me in reading the xml file
On Jan 18, 2008 4:34 AM, Allam Reddy, Thomas <[EMAIL PROTECTED]>
wrote:
> Hi Chas Owens,
>
> Thanks for your reply.
>
> I am getting the following error when running the code given in the
> mail.
>
>
> Can't locate XM
this?
-Original Message-
From: Chas. Owens [mailto:[EMAIL PROTECTED]
Sent: Thursday, January 17, 2008 9:38 PM
To: Allam Reddy, Thomas
Cc: beginners@perl.org
Subject: Re: help me in reading the xml file
On Jan 17, 2008 5:53 AM, Allam Reddy, Thomas <[EMAIL PROTECTED]>
wrote:
snip
> I have got an
On Jan 18, 2008 4:34 AM, Allam Reddy, Thomas <[EMAIL PROTECTED]> wrote:
> Hi Chas Owens,
>
> Thanks for your reply.
>
> I am getting the following error when running the code given in the
> mail.
>
>
> Can't locate XML/Twig.pm in @INC (@INC contains:
snip
XML::Twig is not part of Core Perl. It (a
Jonathan Mast wrote:
I want to write the errors caught by a 'die' clause into a file.
In others words,
open F ">>somefile.log";
blah->blah or die (print F $@)
but the above does work.
die() sends its output to STDERR, so
open STDERR, '>', 'somefile.log' or die $!;
blah->blah or
On Jan 17, 2008 5:53 AM, Allam Reddy, Thomas <[EMAIL PROTECTED]> wrote:
snip
> I have got an xml like this below. I want to read this file in Perl and
> want to retrieve the text which end with .xml.
>
> For example , I want to print the text "jms/hppjmsmodules-jms.xml",
> since it ends with .xml
s
On Jan 17, 2008 9:54 AM, Jonathan Mast <[EMAIL PROTECTED]> wrote:
> I want to write the errors caught by a 'die' clause into a file.
snip
Try
#!/usr/bin/perl
use strict;
use warnings;
$SIG{__DIE__} = sub {
open my $fh, ">>", "something.log"
or die @_, "could not open something.log:
Hello,
well this is more of a mod_rewrite question.
The problem is that you have to use the QUERY_STRING variable in order
to access parameters, these are not part of the normal scope of the
RewriteCond / RewriteRule stuff. Refer to the mod_rewrite guide for that.
We use this to append a use
: Help me with an url rewrite
Hmm,
then please don't post your WRONG solution sample.
-Original Message-
From: [EMAIL PROTECTED]
To: beginners@perl.org
Sent: Fri, 10 Aug 2007 6.26PM
Subject: Re: Help me with an url rewrite
Hmm,
1. I did not sent a solution.
2. I
Hmm,
then please don't post your WRONG solution sample.
-Original Message-
From: [EMAIL PROTECTED]
To: beginners@perl.org
Sent: Fri, 10 Aug 2007 6.26PM
Subject: Re: Help me with an url rewrite
Hmm,
1. I did not sent a solution.
2. I just suggested how you should
Thank you.it works perfectly.
-Original Message-
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
CC: beginners@perl.org; [EMAIL PROTECTED]
Sent: Fri, 10 Aug 2007 6.16PM
Subject: Re: Help me with an url rewrite
Hello,
well this is more of a mod_rewrite question.
The problem is that you
: Friday, August 10, 2007 1:15 PM
To: [EMAIL PROTECTED]
Cc: beginners@perl.org
Subject: Re: Help me with an url rewrite
Sorry first.
But have you looked at my question carefully?
Your solution CAN'T work at all!
-Original Message-
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]; begi
Sorry first.
But have you looked at my question carefully?
Your solution CAN'T work at all!
-Original Message-
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]; beginners@perl.org
CC: [EMAIL PROTECTED]
Sent: Fri, 10 Aug 2007 6.06PM
Subject: RE: Help me with an url rewrite
First, yo
First, you are correct.
This is not the list you need.
You should use something like this:
RewriteRule ^index.php/(.*)$ http://www.site.com/index.php?q1=$1&domain=abc
More info here: http://www.modrewrite.com/
Hope it helps.
Cristi Ocolisan
Let the record show: Microsoft is not an Australian c
"sewe_perl" schreef:
> I wrote a program with activeperl 5.6 some days before,and it could
> work well.
> but today I run it under activeperl 5.8,it can work but there are
> some warnings(Please see the appendix). By the way,activeperl 5.8 do
> not support Chinese?
I guess that you need to put a
On 3/9/06, Rakesh Mishra <[EMAIL PROTECTED]> wrote:
> well I have to prepare for the tech. interview for the post of Perl
> Programmer (first time).
When they ask you to write a Perl program, start with this:
#!/usr/bin/perl
use strict;
use warnings;
That much will probably count f
On Mar 10, 2006, at 6:49, Rakesh Mishra wrote:
I feel akward to ask this question, I know this is not the right
place to
ask this question.
well I have to prepare for the tech. interview for the post of Perl
Programmer (first time).
I have tried google but not usefull, so any of you can sugest
On Tue, 30 Aug 2005, Raghavendra Bhat wrote:
>
> I am begginer to Perl..
> I need write a perl script with subroutine which accepts two strings
> from standard input and checks whether first string has the second
> string.
> Plz help me.
Try putting'perl stdin' into google and see if that
- Original Message -
From: "rocky karhe" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, October 30, 2004 7:59 PM
Subject: help me
> hi
>
> can anybody tell me where can i get help for perl like:
> 1) param()
perldoc -m cgi
> 2) RMD::ForgotPass
> why :: is used
Depend
rocky karhe wrote:
>i am new to php.
>Can u plz elaborate how to get it from headers.
>Is there any function to do so.
This is perl, not php.
I'm new also but seeing as the list is quiet I'll have a go.
Are you familiar with objects?
A quick search on CPAN pulled up the Mail::Folder module.
This
Please use a descriptive subject line.
On Sat, 30 Oct 2004, rocky karhe wrote:
> can anybody tell me where can i get help for perl like:
> 1) param()
You mean the param() function from CGI.pm? See `perldoc CGI`, or
http://www.perldoc.com/perl5.8.0/lib/CGI.html#FETCHING-THE-NAMES-OF-ALL-THE-PAR
Sumanth Sharma wrote:
>
> Hi,
Hello,
> Read with Patience.
>
> Backreferences( $1, $2 ...) are lexically scoped,
>
>which means
>
>in a match like m/()() etc /
>
>Suppose REGEX1 does not match, then $1 remains undefined, and if REGEX2,
> 3 ... do match then $2, $3 wil
Hi Sumanth,
I'm glad that helped. Be careful, though. (?:) may look like a
lookahead (?=), but all it does is group without capturing. It's useful
in cases like yours where all of the capture variables would be stored
in the array--in other cases, I usually don't bother. :)
You can read up on t
Hi Damon,
That's great. It works. I did not know that look ahead could be that
helpful.
Thanks a million,
Sumanth Sharma
"Damon Allen Davison" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Hi,
>
> I think I might be able to help you.
>
> Sumanth Sharma wrote:
> > that's b'coz
Hi,
I think I might be able to help you.
Sumanth Sharma wrote:
that's b'coz $1 is lexically scoped to the first( the only ) parentheses
in the reg-exp.
So, $1 is overwritten on each match.
That isn't actually the case. Well it is the case, but the idion you
are using does indeed capture *all
Urvashi Mishra wrote:
i am trying to implement multidimentional tree... and saw that a package called Tree::Nary already exits...
i am use the above module and i am getting the following error ...
Can't locate Tree/Nary.pm [EMAIL PROTECTED] < @INC contains: C:\perl\site\lib.>
i have saved this mod
On Thursday 04 March 2004 1:17 pm, Urvashi Mishra wrote:
> hi !
>
> i am trying to implement multidimentional tree... and saw that a package
> called Tree::Nary already exits...
>
> i am use the above module and i am getting the following error ...
> Can't locate Tree/Nary.pm [EMAIL PROTECTED] < @I
On 17 Jul 2003 08:23:54 -, [EMAIL PROTECTED] (Vemulakonda
Uday Bhaskar) wrote:
>i am tring to tranfer files between two linux systems through
>sftop
>
>i have installed the following modules :
>
>1. Download Net::FTP and Install
>2. Download Net::SFTP .
>
>and the error displayed afte
On 17 Jul 2003 08:23:54 -, "vemulakonda uday bhaskar" <[EMAIL PROTECTED]> wrote:
>
> hi all,
>
> i am tring to tranfer files between two linux systems through
> sftop
Please use a more descriptive subject line, "help me out please" is not te
It was Friday, June 27, 2003 when vemulakonda uday bhaskar took the soap box, saying:
: dear all
:
: i have a code to tranfer file between two linux machines using
: sftp
:
: for that i used "use Net::SFTP", but it is giving error saying
: "Can't locate Net.SFTP.pm [EMAIL PROTECTED]
: (@INC con
Lielie Meimei wrote:
>> Hello..
>>
>> I'm still newbie.
>>
>> Could u help me to see why in the script perl here can
>> not compiled, please help me.
>>
>>
>> ==Begin of indexsite.pl ==
>>
>> #!/usr/bin/perl
Please always:
use strict;
use warnings;
>> $directo
On Wed, 12 Feb 2003 16:22:41 -0800, Lielie Meimei wrote:
> Hello..
>
> I'm still newbie.
>
> Could u help me to see why in the script perl here can
> not compiled, please help me.
What's the error message printed by Perl ?
Normally it includes also the reason and the location of the error.
>
>
"R. Joseph Newton" wrote:
> Perhaps the author was using the '97 version, and had not bothered to
recheck his prejudices in the last three years.
>
> Joseph
Given the page is dated January 16th, 1998, you may be right.
I am no Microsoft basher. In fact I have an MCSE cert and I used to work
with
Dear folks,
Can you please recommend possible pointers to my problem.
I have a number of perl programs which worked on a large set of txt
files, each program producing its own output for each of the files. I
then put together a summary file of worth while results from these
output files. All this
"John W. Krahn" wrote:
> You might get some help by looking at the source for Demoronizer
>
> http://www.fourmilab.ch/webtools/demoroniser/
Hi John,
Well, it was a cute read, I must say. The only problem is that I'm not sure quite
what application he was talking about. You see, I just tested
"R. Joseph Newton" wrote:
>
> If you want to actually use the non-ASCII characters contained in MS Word,
> you will have to learn the wider character set used. You may also need to
> come up with a list of MS Word control characters.
You might get some help by looking at the source for Demoroniz
Kais,
Those are not ASCII characters. Nor arem ost of them control characters. They are
extended charcters, based on an unsigned, rather than signed, char type. ASCII proper
only extends to character 127, the upward-pointing triangle [or the character so
rendered by my command environment].
Kasi ramanathen wrote:
>
> dear friends i'm in work place and i'm facing a problem of replacing an
> ascii character with some other ascii character i cut the ascii character
> from my word document and pasted it in my pear programme but the result
> is not as i expected. plese give me answer with
For starters, it looks like most of your replacements should use the tr///
function (also known as y///).
http://www.perldoc.com/perl5.8.0/pod/perlop.html
For seconds, $ln=~s/'/'/gis; looks like a no-op to me.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [E
Hey wiggins,
My MUA believes you used
to write the following on Monday, January 27, 2003 at 2:37:14 PM.
wdo> Yes that is an array reference, which is likely correct.
Cool, at least I am not totally out to lunch...
>> My question is how do I get it to print correctly like the FROM
>> l
On Mon, 27 Jan 2003 14:17:36 -0500, Tim Musson <[EMAIL PROTECTED]> wrote:
>
> The above code bit works just fine, with the exception of the
> $client->{TO} part. That prints ARRAY(0x1d8a454) and I _think_ that is
> an array reference (right?).
>
l Message -
> From: "James Edward Gray II" <[EMAIL PROTECTED]>
> To: "Rakhitha Malinda Karunarathne" <[EMAIL PROTECTED]>
> Cc: <[EMAIL PROTECTED]>
> Sent: Wednesday, October 16, 2002 11:43 PM
> Subject: Re: Help me on concurant comiunication
>
&g
ot;James Edward Gray II" <[EMAIL PROTECTED]>
To: "Rakhitha Malinda Karunarathne" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Wednesday, October 16, 2002 11:43 PM
Subject: Re: Help me on concurant comiunication
> Again, this is very complicated, so I can
t; From: "James Edward Gray II" <[EMAIL PROTECTED]>
> To: "Rakhitha Malinda Karunarathne" <[EMAIL PROTECTED]>
> Cc: <[EMAIL PROTECTED]>
> Sent: Tuesday, October 15, 2002 11:29 PM
> Subject: Re: Help me on concurant comiunication
>
>
>> T
D]>
Cc: <[EMAIL PROTECTED]>
Sent: Tuesday, October 15, 2002 11:29 PM
Subject: Re: Help me on concurant comiunication
> This is a pretty involved issue, so I would need more information to
> help. By multiple processes, do you mean your server forks?
>
> As for more information, Ne
This is a pretty involved issue, so I would need more information to
help. By multiple processes, do you mean your server forks?
As for more information, Network Programming with Perl by Lincoln D.
Stein, covers this issue in detail and is quite good, I think.
James
On Tuesday, October 15, 2
like 'code', 'author name' ,
and the atom lines you want
perldoc -f split
perldoc -f substring
perldoc -f grep
> -Original Message-
> From: Baris Ozol [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, June 25, 2002 10:13 AM
> To: 'Kipp, James'
> Subject
can you tell us how the data is file is formatted currently? also and code
you have done so far. and what you want to do with it?
> -Original Message-
> From: Baris Ozol [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, June 25, 2002 9:10 AM
> To: [EMAIL PROTECTED]
> Subject: HElP ...me!
>
>
>Hi everybody,
>Hopefully some of you will help to solve my problem!!
>I'm trying to parse a flat file formatted file. It's a PDB (Protein Data
>Bank).
>But I didn't find any script on internet and perl.com.
>If you'll help me, I will be happy and solve the problem..
>Thank you.
>Bryce
Can Y
On Mar 6, M z said:
>I've written a little program to analyze lines that
>are longer than 70 characters, and if so, break at
>position 70 (if it is whitespace), if not whitespace
>(i.e. is in the middle of a word) it steps back to the
>first whitespace and breaks there.
s/(.{1,70})\s/$1\n/g;
M Z wrote:
>
> Hi
Hello,
> I've written a little program to analyze lines that
> are longer than 70 characters, and if so, break at
> position 70 (if it is whitespace), if not whitespace
> (i.e. is in the middle of a word) it steps back to the
> first whitespace and breaks there.
>
> However,
DISCLAIMER: This is UNTESTED ... It's just something to try...
$OrgLine = "adshe ms0e sad qweoic,m qwod x0 vndu qiudb siu ";
While length of $OrgLine > 70 {
Match on =~ /(.{0,70})\s/
Print $1
Remove $1 from $OrgLine ;
}
Print remainder of $OrgLine;
So, the regex wou
post *all* the
code you have so far, a sample of the input data and detail exactly what you
are trying to do? Maybe then we can help some more. Thanks
John
-Original Message-
From: Susan Aurand [mailto:[EMAIL PROTECTED]]
Sent: 15 February 2002 15:14
To: [EMAIL PROTECTED]
Subject: Re: Help m
I took your advice and added the following code to my source code. I want to print
the students name to the result
file regardless if I add a number on the end of the student name or not. I have
tried putting the PRINT O
at different location in this code. I can not get it to print to the result
On Thu, 14 Feb 2002, Matthew Peter Lyon wrote:
> hey, leading off this... a question for the group... are the ways in
> programming to solve problems / situations called 'design patterns' ?
Well, sorta... 'design patterns' refers to a specific way of analyisng
software design. It actually comes
<[EMAIL PROTECTED]>
To: "Yacketta, Ronald" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Thursday, February 14, 2002 3:48 PM
Subject: RE: Help me out
> Yeah I agree, I owe about 5 perl books and have read them all but still
find
> it difficult to code the most basic
NO! Don't use Matt's Script Archive!!!
That code is old and full of errors. Go to
http://nms-cgi.sourceforge.net/
and you will find "the rest of the story" and
equivalent scripts that are well written and
tested.
Also, check out
http://perl.about.com/
for some good
2:04 PM
To: 'Naika - EV1'
Subject: RE: Help me out
If you learn by seeing then look at other people's code to learn.
Correct their mistakes, make the code more efficient and easier to
read/understand.
I learned Perl 3 years ago and that was with Perl4. I didn't really learn
-
From: Richard Crawford [mailto:[EMAIL PROTECTED]]
Sent: Thursday, February 14, 2002 1:57 PM
To: Naika - EV1
Cc: Yacketta, Ronald; [EMAIL PROTECTED]
Subject: RE: Help me out
The books that Matthew suggested are excellent resources, I've found
(though I would also recommend "Programming
ng on the artistic side of the mind.
>
> - Naika
> http://www.naikaonline.com
>
>
>
> -Original Message-
> From: Yacketta, Ronald [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, February 14, 2002 8:50 AM
> To: [EMAIL PROTECTED]
> Subject: RE: Help me out
>
>
>
PROTECTED]
Subject: RE: Help me out
its that simple? WoW! I must have fubarbed somewhere, I have those books as
well as several others and hell I am not even close to be a pro!/me dreams
about the day I can be a perl gawd like Randel (spelling)
-Ron
> -Original Message-
> From: Ma
TECTED]]
> Sent: Thursday, February 14, 2002 11:49
> To: amrinder singh; [EMAIL PROTECTED]
> Subject: Re: Help me out
>
>
> get the O'Riley learning perl book
> get the black book
> get the cookbook ( O'Riley )
>
> you'll be a pro.
>
>
get the O'Riley learning perl book
get the black book
get the cookbook ( O'Riley )
you'll be a pro.
- Original Message -
From: "amrinder singh" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, February 14, 2002 12:24 PM
Subject: Help me out
> I have just started learning per
Thursday, February 14, 2002 6:45 AM
To: 'amrinder singh'; [EMAIL PROTECTED]
Subject: RE: Help me out
I really suggest the O'Reilly books, "Learning Perl" 3rd edition. ISBN
0-596-00132-0
Also go to www.CPAN.org, and follow the FAQ on what you need to run a
Perl
environmen
1 - 100 of 117 matches
Mail list logo
