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
>
>
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
/(?[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
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
>>
>>
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:
> >
> >
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
On Wed, May 18, 2011 at 2:55 PM, ind...@students.itb.ac.id 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
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, ind...@students.itb.ac.id wrote:
S == Saran mail2sarava...@gmail.com 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 --
-
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:
#!
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
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 =
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
On Thu, May 12, 2011 at 6:23 AM, Nathalie Conte n...@sanger.ac.uk 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
On Thu, May 12, 2011 at 10:23:29AM +0100, Nathalie Conte wrote:
snip
I have this file format
chrstartendstrand
x 12241
snip
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
On Thu, May 12, 2011 at 11:23 AM, Nathalie Conte n...@sanger.ac.uk 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
Matthew == Matthew Young mab...@gmail.com 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 -
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 effectively
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
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
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
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 superclass
From: 120 zen158...@zen.co.uk
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.
SHC == Shawn H Corey shawnhco...@gmail.com 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
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 whole string.
Steve Bertrand st...@ibctech.ca 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 remove
Christer Ekholm wrote:
Steve Bertrand st...@ibctech.ca 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;
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
On Thu, Jul 9, 2009 at 15:18, Umar Drazi_deb...@yahoo.com 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
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
6 TTT 300
7
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 ghghjghjg
2
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 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 (and its
on 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 xml like
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 XML/Twig.pm in @INC (@INC contains:
snip
XML::Twig
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 Oops;
snip
OK, so were binding
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 recursion if it fails to open
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 fact,
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 @_, could not
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
snip
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: $!;
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 die
: 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]; beginners
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
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 do.
3
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
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=$1domain=abc
More info here: http://www.modrewrite.com/
Hope it helps.
Cristi Ocolisan
Let the record show: Microsoft is not an Australian
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, you
: 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 just
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
use
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 for
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
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 gives
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
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
- 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
Depends on how
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] @INC
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
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 terribly to
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 after
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
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;
$directory='/root/tmp';
[snip
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
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 Demoronizer
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 the
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:
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
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].
On Mon, 27 Jan 2003 14:17:36 -0500, Tim Musson [EMAIL PROTECTED] wrote:
snip
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?).
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
line?
: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, Network Programming with Perl by Lincoln D.
Stein, covers this issue in detail
: 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, Network Programming with Perl by Lincoln D.
Stein, covers this issue in detail and is quite good
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 really only give basic
theory. The usual strategy
Subject: Re: Help me on concurant comiunication
Again, this is very complicated, so I can really only give basic
theory. The usual strategy of forking servers is to fork just after
they receive a connection. The main loop usually looks close to:
while (my $c = $socket-accept) {
my $child
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,
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 You
this and grab what you want 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: RE: HElP ...me
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 would
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, I think
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;
That
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
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 me out
I took your advice and added the following code to my source code. I
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
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
environment on your system.
After you've setup an environment, you can start by running some examples in
the book to get a grasp.
V
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
environment on your system.
After you've setup an environment, you can start
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 perl a
]]
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.
- Original Message -
From: amrinder singh [EMAIL PROTECTED]
To: [EMAIL
]
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: Matthew Peter Lyon
-Original Message-
From: Yacketta, Ronald [mailto:[EMAIL PROTECTED]]
Sent: Thursday, February 14, 2002 8:50 AM
To: [EMAIL 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
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 Perl, also from O'Reilly
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
perl until I started
, 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 of things. I wish there were more step
by step how to's out
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
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
I'm not sure the other answers you have had address all the problem. They
have all addressed the problem of (possibly multiple) whitespace (\s) at the
end of a line. You have asked to remove all the newline characters in a
string.
I would propose
$string =~ s/\n//g;
The s does a substitute;
You don't mention which one you are having problems with.
First off though, you should change
$custdir=/uhome/cachet/temp/temp1/cust/;
to
$custdir=/uhome/cachet/temp/temp1/cust;
as you are adding the trailing slash when you open the file.
open (CHAN, $custdir/mail.txt)
Hey sridevi,
Friday, June 22, 2001, 3:07:40 AM, you wrote:
sa Hi all, Could anyone briefly explain the difference between
sa the shell script and the scripting language like perl? Thanx in
sa advance, visu
sa __
sa Do You Yahoo!?
sa Get
1 - 100 of 106 matches
Mail list logo
