Hi All,
Any good modules or pointers on following topics.
1) logging - for logging errors.
2) exceptions handling.
Thank you,
--
Santosh
I have seen some quick help option in some of the interpreters in python
like Ipython and bpython. Do we have similar kind of projects or
interpreter tools which i can start using in perl.
Note: i am using ubuntu.
Thanks,
--
D. Santosh Kumar
RHCE | SCSA
+91-9703206361
Every task has a
Any good pointers or links on learning perl . Also any good pointer on OOPS
concepts.
Dear Lars Nooden,
Thanks a lot. I will write the program
and let you know how it works.
Sincerely yours,
Anant Kumar
B.Tech; Biotechnology
Hi Jim Gibson,
I want to write a search engine of my own.
Similar to Google but not as complex as that. Just for simple data mining
for my research work.
Sincerely yours,
Anant Kumar
B.Tech; Biotechnology
On Fri, Mar 14, 2014 at 8:41 PM, Jim Gibson wrote
Just want to
search and store it any format like XML etc.
Any help will be appreciated,
Sincerely yours,
Anant Kumar
B.Tech; Biotechnology
On Fri, Mar 14, 2014 at 5:43 PM, Charles DeRykus wrote:
> On Fri, Mar 14, 2014 at 4:26 AM, Alex Chiang
> wrote:
>
> > I tried to extr
Hi,
I am reading a set of regex, separated by comma, from database, which is in
string format and using eval to convert them in the array.
For e.g.,
String from database is 'qr/^abc .* $/,qr/xxx/'
$string = 'qr/^abc .*$/,qr/xxx/'; # this $string comes from DB
$string = '[' . $string . ']';
my @cl
I too looking for this... and later on moved to Padre, the Perl IDE (easy to
read and write code).
- Original Message -
From: kavita kulkarni
To: beginners@perl.org
Cc:
Sent: Thursday, 25 April 2013 8:32 PM
Subject: Perl scope like cscope
Hi,
This could be naive.
I use perl on linux
Thanks all of you for your suggestions, yesterday late evening I figured it
out about returning "\r\n" . I also checked after setting input record
separator($/) variable to \r\n which was also working.
I like the idea about setting binmode.
Thanks again.
--
Praveen
Login ID : praveenku...@gmail.com
Enter NT Password : randompass
Enter Build Number : 12
, build : 12 randompassil.com --> This is what I am getting
User : praveenku...@gmail.com, Password : randompass, build : 12 -->
This is what I expect.
--
Praveen Kumar
http://fedoraproject.org/wi
understand
where did you make mistake.
>
> --
> 继续上路。。
>
--
Praveen Kumar
http://fedoraproject.org/wiki/User:Kumarpraveen
http://fedoraproject.org/
http://kumar-pravin.blogspot.com
ftp.co.xx Success
> Oct 3sshserverssh.co.xx Success
>
>
> I'm really lost here. I know I have to use some sort of nested hashes
> but I just couldn't figure it out.
>
> --
> To unsubscribe, e-mail: beginners-unsubscr...@pe
ers-h...@perl.org
> http://learn.perl.org/
>
>
>
--
Praveen Kumar
http://fedoraproject.org/wiki/User:Kumarpraveen
http://fedoraproject.org/
http://kumar-pravin.blogspot.com
the array)
> AB AC AD AB AB (keep)
>
> Sorry for the naive questions!
>
> Best wishes
> Li
>
http://stackoverflow.com/questions/2305504/how-can-i-check-if-all-elements-of-an-array-are-identical-in-perl
Hope it will help you.
--
Praveen Kumar
http://fedoraproject.org/wiki/
]http://www.thegeekstuff.com/2008/09/how-to-install-perl-modules-manually-and-using-cpan-command/
> --
> 继续上路。。
>
--
Praveen Kumar
http://fedoraproject.org/wiki/User:Kumarpraveen
http://fedoraproject.org/
http://kumar-pravin.blogspot.com
Hi,
I am BE(CSE) fresher.I got a call for interview and openings is in perl.I
know the basics of perl.Please let me know what i have to prepare for
interview.Any link for frequently asked scripts??
--
K.V. PAWAN KUMAR
Thanks Jim
Now i understood completely. Very good explanation.
On Fri, May 27, 2011 at 10:45 AM, Jim Gibson wrote:
> At 10:28 AM +0530 5/27/11, vishesh kumar wrote:
>
>> Hi Jim
>>
>
> You should address all of your questions to the list as a whole. That way
> you w
Hi Jim
echo $str | perl -pe 's/.*?(\d+\.[\d.]+).*/$1/'
Giving desired result, but i wonder what is use of ? in this expression
On Tue, May 24, 2011 at 11:59 AM, Jim Gibson wrote:
> At 9:41 AM +0530 5/24/11, vishesh kumar wrote:
>
>> Hi Members,
>>
>> I am a
Thanks Jim
Your suggestion working great !!!
On Tue, May 24, 2011 at 11:59 AM, Jim Gibson wrote:
> echo $str | perl -pe 's/.*?(\d+\.[\d.]+).*/$1/'
--
http://linuxmantra.com
Hi Members,
I am a linux system admin. I want to use perl as a command line like sed
and awk.
For example suppose , i need to extract IP Addr from a string or file using
regrex
i mean
str="hello ip is 192.168.2.1 and data is xxx"
And i want ip addr only using Regex
echo $str | perl -pe ?
Hi Members,
I am a linux system admin. I want to use perl as a command line like sed
and awk.
For example suppose , i need to extract IP Addr from a string or file using
regrex
i mean
str="hello ip is 192.168.2.1 and data is xxx"
And i want ip addr only using Regex
echo $str | perl -pe ?
From: terry peng
To: beginners
Sent: Thu, February 10, 2011 2:07:43 PM
Subject: about return
>hello,
>
>when in the case "return undef" I prefer just "return" coz in list context it
>will return an empty list.
>
>my $exist = ...
>if ($exist) {
> return 1;
>} else {
>return;
>}
>
>the
From: Rob Dixon
To: beginners@perl.org
Cc: Greg J
Sent: Thu, January 27, 2011 11:38:07 AM
Subject: Re: Regex
On 27/01/2011 02:15, Greg J wrote:
> I am trying to extract numeric values from a data file and I'm having
> trouble writing a regular expression that would do this.
>
> My data looks
Is this what you're trying to do Greg? Try running the script below:
#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;
my $data = "<{5,26} {20,42,64} {23,48}>"; # assuming it's read in from a
file
$data =~ s/(?<=})\s*(?={)/,/g; # replace spaces between number sets with commas
Dear all
Without involving in this dicussion deeply , i just want to mention
my view . As a newbie in perl as well in this forum i found Shlomi
Fish answers very useful and to the point. So i think blaming
spamming short of thing is not right.
Thanks
On 12/30/10, Shlomi Fish wrote:
> On W
reflected in original
file.
Can any1 please help in this regard.
--
K.V. PAWAN KUMAR
Hi folks,
Can anyone please explain what is "perlform" and its
usage.I used google but i was not able to crack.
Thanks for the time.
--
K.V. PAWAN KUMAR
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@per
are already subscribed to the
> list.
>
> Is this your first post?
>
> Please post your exact question.
>
> Cheers,
> Parag
>
>
>
> On Mon, Oct 4, 2010 at 9:49 AM, sheikh numan iqbal >wrote:
>
> > hi,
> >
> > i want to login and need help on perl...
> >
> > regards,
> > numan
> >
>
--
K.V. PAWAN KUMAR
Hi John,
This is pawan.Thank for the all the inputs regarding program.John
its working.
Great john.
Thank you.
On Mon, Sep 27, 2010 at 3:32 PM, John W. Krahn wrote:
> pawan kumar wrote:
>
>> Hi guys i need your folks help:
>> Problem:I have to accept the eleme
*=2;
print "$num\n";
#$arr{$i}=($i*5);
}
print "finally : @arr";
--
K.V. PAWAN KUMAR
Hi all,
I would like to know any available web links for learning file operations
.which helps from basic and to little deeper.
Seached in google ,but i didnt get required info.
Regards,
chandan.
Hi ,
using split ,I would like to split on space character. Dont want to use
character classes.
my $string="108 ambulance 100\nfireengine141jack";
my @array = split /' '/,$string;
foreach my $value (@array){
print "$value \n";
}
Result : its splitting on new line character.instead of spa
"John W. Krahn"
scribbled:
> Rob Dixon wrote:
>> On 20/07/2010 16:22, Chandan Kumar wrote:
>>>
>>> Small confusion about word boundaries. word boundaries matches
>>> anything between non-word character and word character ,right.
>>
>> Not qui
Hi ,
Small confusion about word boundaries. word boundaries matches anything between
non-word character and word character ,right.
Here is small example :
$_ = "?Jack do you know the beauty of perl"
print "Enter your text:";
my $pattern = ;
chomp $pattern;
if (/$pattern/){
print "1.$1\n";
}
Thanks guys, I could able to understand split fun.
--- On Mon, 19/7/10, John W. Krahn wrote:
From: John W. Krahn
Subject: Re: usage of Split on pattern matching
To: "Perl Beginners"
Date: Monday, 19 July, 2010, 4:29 PM
Chandan Kumar wrote:
> Hi all,
Hello,
> Iam beginner
Hi all,
Iam beginner to perl & i have a small query on split.
using split i want print everything even the character used to split on string.
Here is my example :
my $string = "hi123now456itstimeforsplit789right"
my @array = split ( '/(\d+\s)/ ',$string);
## Trying to split using digitnumbe
Thanks in advance.
Best Regards,
chandan.
--- On Thu, 15/7/10, Chas. Owens wrote:
From: Chas. Owens
Subject: Re: Query on Qunatifiers
To: "Thomas Bätzler"
Cc: "Beginners Perl" , "Chandan Kumar"
Date: Thursday, 15 July, 2010, 2:08 PM
On Thu, Jul 15, 20
Hi ,
Thanks guys for your quick response.
I will try it out combinations and get back to you if i have issues.
Regards,
chandan.
--- On Thu, 15/7/10, Thomas Bätzler wrote:
From: Thomas Bätzler
Subject: AW: Query on Qunatifiers
To: "Beginners Perl"
Cc: "Chand
Hi ,
I have query over quantifiers.
Could you please explain the combination of operators Question mark
(?),dot(.),star(*),plus(+).
Say this is my string:
$_ = " this is my first pattern ,quite confused with quantifiers"
ex: (thi.*?) or (thi.+?) etc
I know what each operator doe
Dear all
I am working on small project of self learning firewall using
perl script on linux. In my script i capture dns packet moving outside
from my network and get domain name of site that user trying to
access.( That part i done successfully.)
Now i want to get authentic
Thanks Steve,
That did the trick! Going through 'perldoc perlop' now :-)
On Mon, May 10, 2010 at 9:16 PM, Steve Bertrand wrote:
> On 2010.05.10 11:25, Vimal Kumar wrote:
> > Hi all,
> >
> > I am relatively new to Perl. Was learning references and thought of
&g
Hi all,
I am relatively new to Perl. Was learning references and thought of creating
a script that will list the username and its list of domains from httpd.conf
(on a cpanel server). I am curious to know why line
if (/DocumentRoot \/home\/(\S+?)\//) {
works whereas
if (#DocumentRoot /home/(\S+
Hi Folks,
I am trying to connect to a server where i want to create a file or read a
existing file.
This is my code.
#!/usr/bin/perl
use Net::Telnet ();
$t = new Net::Telnet (Timeout => 10,
Prompt => '/] $/');
# My prompt will be looking after telnet session like this "[
I got your problem.
Pass the parameters like below,
&replace_txt('\$a', '$b');
It will work fine.
In this line, $line =~ s/$old/$new/g;
$old should have \$a, in order to match a variable name.
If u pass '$a' alone - &replace_txt('$a', '$b');
$old will have $a and it will search for the value of
HI
Pass the parameters in double quotes or simply $a, $b. Like below
&replace_txt("$a", "$b");
&replace_txt($a, $b);
Single quotes doesn't interpolate the variables.
Thanks,
Suresh
<>
Hello,
I want to replace text in file.
So, I wrote subroutine like this:
sub replace_txt {
my ($ol
Hi Guyies
I am working on a script that parse the excel sheets and write the data into
another excel sheet.
we have more than 40 excel file to parse ,
when i am parsing excel sheet i am getting out of memory error
out of memory issues comes after some file has parsed
if i parsed 5 or 6 file
hi it is ananymous subroutine
Here $_ means value of the argument that passed to the sunroutine
And
$$_ you can understand like below
$name="ajay";
$class="name"
$$class== ajay
Thanks
Ajay
-Original Message-
From: Shawn H Corey [mailto:shawnhco...@gmail.com]
Sent: Thursday, Septem
hi All
I have some zip data that contans name of different file
when i unzipped data i got hundreds of file i passed each file in a
subroutine and parse the data and write into excel sheet
i am passing approximate 196 file individually
during parsing and writiting into excel script is taking
You you put below word in "" Quote it treat as a string and if it kept in
single quote it treat as character so for the DNS(domain name space) it
should treat as charaterwies not as string so that it can read data from the
link
-Original Message-
From: Dr.Ruud [mailto:rvtol+use...@is
ay
-Original Message-
From: beginners-h...@perl.org [mailto:beginners-h...@perl.org]
Sent: Friday, August 21, 2009 3:43 PM
To: Ajay Kumar
Subject: WELCOME to beginners@perl.org
Hi! This is the ezmlm program. I'm managing the beginners@perl.org mailing
list.
I'm working for my owner, w
Thanks a lot
-Original Message-
From: Steve Bertrand [mailto:st...@ibctech.ca]
Sent: Thursday, June 18, 2009 3:01 PM
To: Ajay Kumar
Cc: beginners@perl.org
Subject: Re: "list the user working on a single file"
Ajay Kumar wrote:
> Hi all
> I have one requirement that
>
Hi all
I have one requirement that
Suppose I have one file sample.txt
I just want one mail if anybody touch this file
Can you guys suggest me how I can implement this ?
Your suggestion would be appreciated
Thanks in advanced
2.3.56 or 2.0.12 and so on...
plz advice
____
From: Ajay Kumar
To: Irfan Sayed
Cc: "beginners@perl.org"
Sent: Wednesday, June 17, 2009 5:01:41 PM
Subject: RE: regular expression help
Hi Irfan
This code solve your problem
my $p="\"ProductName
Hi Irfan
This code solve your problem
my $p="\"ProductName\" = \"8:EXFO RTU System 1.2.42\"";
my ($val)=$p=~ m/\d+.\d+.(\d+)\"/;
my $inval=$val+1;
$p=~s/$val/$inval/;
print"===$p\n";
thanks
Ajay
-Original Message-
From: Irfan Sayed [mailto:irfan_sayed2...@yahoo.com]
Sent: Wednesday, June
Hi Irfan
You can do all four task like below
1: open FILE ,">filename.txt" or die$!;
2: my @lines=
3: do changes through sed
Like sed -e 's/original pattern/new pattern/p' filename
4:if you did changes it automatically get saved
5: close(FILE);
Thanks
Ajay
-Original Message-
Fr
Just redirect in some temporary file
Like
Open STDERR,">/den/null";
That's it
-Original Message-
From: Noah Garrett Wallach [mailto:djb...@sffun.org] On Behalf Of admin2
Sent: Thursday, May 28, 2009 5:38 AM
To: Perl Beginners
Subject: suppressing Use of uninitialized value in pattern m
Because first element of the array is empty
-Original Message-
From: sanket vaidya [mailto:sanket.vai...@patni.com]
Sent: Wednesday, May 27, 2009 4:16 PM
To: beginners@perl.org
Subject: Question about split
Hi all,
Kindly look at the code below:
use warnings;
use strict;
$_ = '
Hi
Here (.) means current directory
(..) means parent directory
But you are getting (..) and (...)
Because you kept one (.) in map{{$_.\n"}
Remove the (.) after $_ you will get correct output
Thanks
Ajay
-Original Message-
From: Telemachus [mailto:telemac...@arpinum.org]
Sent: M
Hi Alexander
Or you can use this
($temp=~ m/([A-Za-z0-9]{5})\.([0-9]{1,2})[+-]([0-9]{1,4})\.([0-9]{1,4})/);
This is more compact and accurate
Thanks and regards
Ajay
-Original Message-
From: Alexander Koenig [mailto:alexander.koe...@mpi.nl]
Sent: Tuesday, May 19, 2009 7:25 PM
To: beginn
It's good for the beginners
-Original Message-
From: John W. Krahn [mailto:jwkr...@shaw.ca]
Sent: Sunday, April 05, 2009 9:24 PM
To: Perl Beginners
Subject: Re: Using array from subroutine
Thomas H. George wrote:
> In order to call them from menubuttons I moved my code into subroutines.
>
http://qmantraz.com/page/quiz#quiz/6
Bollywood news, movie reviews, film trailers and more! Go to
http://in.movies.yahoo.com/
Thank you very much for your help.
This satisfies my requirement.
Thanks
suresh
On Thu, Feb 12, 2009 at 4:27 PM, Rob Dixon wrote:
> suresh kumar wrote:
> >
> > This is my code :
> >
> > $::dev2->getvalue($x,$y);
> > $::dev3->getvalue($x,$y);
> > $:
Hi all
>
> This is my code :
>
> $::dev2->getvalue($x,$y);
> $::dev3->getvalue($x,$y);
> $::dev4->getvalue($x,$y);
> $::dev5->getvalue($x,$y);
> $::dev6->getvalue($x,$y);
> $::dev7->getvalue($x,$y);
> $::dev8->getvalue($x,$y);
> $::dev9->getvalue($x,$y);
> $::dev10->getvalue($x,$y);
> $::dev11->get
Thanks for the response.
but is there anyother way to do this?
On Mon, Nov 24, 2008 at 6:40 PM, Mr. Shawn H. Corey <[EMAIL PROTECTED]>wrote:
> On Mon, 2008-11-24 at 16:11 +0530, suresh kumar wrote:
> > Hi,
> >
> > Here is the sample code:
> >
> > sub
Hi,
Here is the sample code:
sub a {
print "i am a\n";
return 0;
}
sub b {
print "i am b\n";
return 1;
}
if (a() && b()) {
print "yes\n";
} else {
print "no\n";
}
I want both the subroutine to be executed, and then i want print some
statements depending upon both the results.
here if a() ret
Chas. Owens wrote:
On Tue, Oct 21, 2008 at 09:40, Sandeep Kumar
<[EMAIL PROTECTED]> wrote:
hi all,
i am using expect module to connect to a remote server. i am getting the
following error.
Cannot sync with child: Interrupted system call at /perl_path/lib/Expect.pm
line 134,
so
hi all,
i am using expect module to connect to a remote server. i am getting the
following error.
Cannot sync with child: Interrupted system call at
/perl_path/lib/Expect.pm line 134,
somebody please let me know a solution for this.
thanks,
sandeep.
--
To unsubscribe, e-mail: [EMAIL PROT
Hi ,
Does anybody know about the intermail perl.
Regards,
Pranaw
Disclaimer:
This message and the information contained herein is proprietary and
confiden
Please suggest
Regards
Irfan.
*From:* Sandeep Kumar [mailto:[EMAIL PROTECTED]
*Sent:* Wednesday, August 13, 2008 5:39 PM
*To:* Irfan J Sayed (isayed)
*Cc:* beginners@perl.org
*Subject:* Re: Execute the Linux command on remote
$ssh->login(cgadgil, cgadgil);
my($stdout, $stderr, $exit) = $ssh->cmd(ls);
Please help.
Regards
Irfan.
-Original Message-
From: Sandeep Kumar [mailto:[EMAIL PROTECTED]
Sent: Wednesday, August 13, 2008 3:27 PM
To: Irfan J Sayed (isayed)
Cc: beginners@perl.org
Subject: Re
Irfan J Sayed (isayed) wrote:
Hi All,
I want to execute one command on remote Linux machine.
Following is the perl code.
#! /usr/bin/perl;
# perl module to parse the Install.log file for errors
use lib "/tmp/";
use Net::SSH::Perl;
my $ssh = Net::SSH::Perl->new(avm-qa-cam2.net.com
Hi,
This is my part of the script,
if (($#ARGV == 1) && ($ARGV[0] eq "-f")) {
..
if ($ARGV[0] ne "-f" ) {
..
if i run my script i am seeing this kind of warnings.
Use of uninitialized value in string eq
Hi,
I'm using PERL for the first time, and I need to parse an XML
Document.
Essentially we have a file that's structures like this
now when I do something like
$data = XMLin($XML, forcearray => ["C"]);
It has something similar to
$VAR1 = { B => { C => [ {1}, {2}. {3} ]}
Now accessin
I WANT TO CREATE A WEB INTERFACE FOR A SOFTWARE CALLED BLAT USING CGI AND I
HAVE DOWNLAODED AND INSTALLED APACHE WEB BROWSER FOR IT BUT I DONT KNOW HOW
TO GO AHEAD,PLEASE ASSIST ME
> Perhaps if you told us what you need
> a tree for (because you almost never need a tree for itself) we could
> suggest a good high level module.
I am trying to analyze BGP routing table available at RouteViews
routing archive. The data looks something like
1.0.0.0/8 1 2 3 4 5 6
hi all
>
> i am creating a perl script which takes the input from the file to
> create tables, inserting values into the database. As you all know the
> only procedure for taking input from a file (using perl script) into
> MySQL database is through (?) place holders.
> for example ,
>
> $sth=$dbh
hi Rob,
What exactly i wanted to do is..
to take a input from a file of format :
INPUT.txt :
Details> name , id INTEGER, area VARCHAR(32)
prady,2039,india
sandy,2398,india
sam,1234,aussie
Rob,2345,Eng
extraDetails>name1 VARCHAR(12), name2 VARCHAR(12)
prady,sandy
sandy,Rob
Rob,sam
sam,prady
in
The usually the format of the mail will be
HEADER1
HEADER2
HEADER3
..
..
..
HEADERn
BODY
Please note there will be a blank line b/w the end of the header and the
body.
So you start from the beginning of the mail and keep ignoring the lines
until you find a blank line
The rest of it would be
Hi All,
Can anybody suggest me how can I implement my own Data::Dumper(a function
which work similar to perl Dumper).
Thanks and Regards
Nitesh
Hi All,
I want to convert binary data to hexadecimal.
below is the code I used for the conversion.
It is converting only for 32 bit.
Can anybody suggest me for bit containing more tham 32(it may be 64 or 128).
Thanks and Regards
Nitesh
$str = "1010101010101010101010101010101010101010";
my $str
Hi all,
can any one tell me what is the difference between perl and
mod_perl in detail ??
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Thank You It worked fine
-Anand
"Mumia W." <[EMAIL PROTECTED]> wrote:
On 06/20/2007 02:07 AM, anand kumar wrote:
> Please guide me with some code or documentation for the following problem :-
>
> I need to set some specific time for a command to execute. [...]
Please guide me with some code or documentation for the following problem :-
I need to set some specific time for a command to execute. For example, If I
am opening a very large file and it takes me more than 3 to 4 seconds then my
code should be able to quit the program or kill the process
Hi all,
I would like to know if there is any possibilty to handle a situation where
in while executing a perl script if i press a Control-C (or terminate the
execution explicitly) then my code should be in a position to handle it and
display a predefined message(or specifically execute predefi
Hello,
"cd" does not work as expected in perl.
use chdir instead and it will do what u want .
ex : chdir "dest_folder" # go to directory
system("ls ") # do what u want.
chdir "orignal_folder" # come back to orignal dir
Thanx
Hello,
Since you are having the whole file in an array.
1. Keep an index to specify the current line read
2. Once you found the desired string, you have the index also. So
you can
decrement the index and get the lines.
$inex = 0;
foreach $line (@lines) {
$index++;
if($l
Hello,
passing data / ( or sharing data, information ) between two
processes can be done
1. Writing the content in one file from 1st process and then reading
from second process.
you can do it, using simple text file or using seriallization.
2. Second way is through sockets. Once
http://e-p-i-c.sourceforge.net/
-Original Message-
From: Nath, Alok (STSD) [mailto:[EMAIL PROTECTED]
Sent: Wednesday, May 02, 2007 5:41 PM
To: beginners@perl.org
Subject: Perl plugin for eclipse
Hi,
Has anybody used any perl plugin for Eclipse ?
Please share your thoughts.
I am lo
Saravana Kumar wrote:
> yitzle wrote:
>
>> You can read one list into an array (@list) and then loop through the
>> other file ($item) and grep the list for the item.
>>
>> for ($item = <>) { # or foreach
>> print "$item found" if ( grep $i
yitzle wrote:
> You can read one list into an array (@list) and then loop through the
> other file ($item) and grep the list for the item.
>
> for ($item = <>) { # or foreach
> print "$item found" if ( grep $item, @list );
> }
>
> On 4/20/07, Saravana
Boga Srinivas wrote:
> Hi kumar,
>
> Try this.
>
> [EMAIL PROTECTED]:~/perl$ cat reg.pl
> #! /usr/bin/perl
> $id="[EMAIL PROTECTED]";
> while(<>) {
> chomp($_);print "$_\t";
> print "$id found\n" if /$id/;
> print "$i
Hi list,
I am testing a regex with email ids. I have a list of ids that i want to
match against a one more list of ids.
I have this:
#! /usr/bin/perl
$id="[EMAIL PROTECTED]";
while(<>) {
chomp($_);print "$_\t";
print "$id found\n" if /$id/;
print "$id not found\n" if ! /$id/;
}
and a file /tmp/
quot;" or c.miles is NULL;
Hope that helps,
Anoop
On 4/18/07, Anoop kumar V <[EMAIL PROTECTED]> wrote:
Can you share the table create scripts? You need to send us the output of
show create table OWNER.CONFERENCE;
Also send across some sample data.
ANoop
On 4/18/07, Katie L. Barbee &
Can you share the table create scripts? You need to send us the output of
show create table OWNER.CONFERENCE;
Also send across some sample data.
ANoop
On 4/18/07, Katie L. Barbee <[EMAIL PROTECTED]> wrote:
I believe this is a very simple question or at least I'm hoping ...
I am trying to sel
Hi
Mails which are send by the perl script are usually found in the SPAM or
JUNK as a result most of the mails are not seen by the recipient. Is
there any way in the perl script we can set some Magical Header :) by
which the mail goes to INBOX only. First of all can we do in the perl
script o
Hi
In java we have instance operator to tell the type of Object.
Similarly in perl say I am passing a reference object to a function,
Is it possible to detect in the function whether the object is HASH or
ARRAY...
Thanks
Anish
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional comma
Hi
The Parameter value passed from the main PL file to the subroutines are
not passed correclly in the same order
say the class Id and schoolname are passed correctly as "70" and "ABC".
But in the subroutine when I print it is not correct. Some Junk value. I
think this is something to do with
cursive include!)
> _
> From: Kumar, Akshay
> Sent: Thursday, March 22, 2007 5:11 PM
> To: 'beginners@perl.org'
> Subject: Some basic perl queries
>
> Hi All,
> I am playing around with a set of perl scripts. Need to figure out
> followi
Hi All,
I am playing around with a set of perl scripts. Need to figure out
following things.
A) move out common code from the set of scripts and have them include
that common code. (something equivalent of #include!) . Most of the
common code is about some arguments (proxy-url, database, user, pass
Hi Jm,
1. If you use $class->speak(@_), the programe will go to infineite
loop.
because of recursive call.
2. The example is to demostrate, how to call the method of a class
immediately
up in the class hirarchy.
Hope it helps
Madan
Jm lists wrote:
Hello,
Consi
1 - 100 of 300 matches
Mail list logo
