Need help with Win32::IEAutomation

I am trying to use Win32::IEAutomation module to test one web application which is HTTPS based. I am unable to bypass SSL security warning. Can someone help - here's the code I am using. use Win32::IEAutomation; use Win32::IEAutomation::WinClicker; # this will provide methods to interact with dia

CPAN cannot install modules locally

ot working. Any help will be greatly appreciated. Thanks, Alok

PLEASE STOP SENDING MIALS

Re: copy ffiles and directories recursively

ot;.$dirs[$list],"\n"; mkdir ($ndir."\\".$dirs[$list]); &myReadDir($dir."\\".$dirs[$list]); } return 1; } Can somebody point how to fix this ? Regards, Alok. "John W. Krahn" <[EMAIL PROTECTED]> wro

copy ffiles and directories recursively

Hi, I wanted to recursively copy the contents of a directory(both directory and files) from one folder to the other. The below code does only copy of directories but leaves behind files. Can anybody help me how to do that ? Regards, Alok #!/usr/bin/perl $startDir = q{c:\test

matching and parsing commands

kind of grammars for the command and parse it ? Is Lex and Yacc are of any help here ? Regards, Alok - Never miss a thing. Make Yahoo your homepage.

Re: problem connecting to mysql database

Hi, May be valid. I am getting superstitious now. Anyway, I have not installed any mysql client.I have simply downloaded InstantRails which has mysql and started the mysql server which is up and running. Can you explain why you need mysql client now ? Regards Alok

problem connecting to mysql database

tabase=test:host=localhost;mysql_emulated_prepare=0", "root", "", { RaiseError => 1, PrintError => 0 }, ); $dbh->disconnect ; Not sure what's wrong. Regards, Alok Building a website is a piece of cake. Yahoo! Small Business gives you all the tools to get online. http://smallbusiness.yahoo.com/webhosting

Re: parsing a line

Hi Chas, Can you please explain the portion ( ([\w ]*\w)\s*= )of the regex.? And why its stored in $s.Can it be directly stored in hash my %rec. Thanks Alok if (my %rec = $s =~ /\s*([\w ]*\w)\s*=\s*"(.*?)"/g) { my $id = exists $rec{ID} ? $rec{ID} : "not s

Re: processing XL using Win32::OLE

Found a good tutorial here : http://www.perlmonks.org/?node=153486 - Original Message From: alok nath <[EMAIL PROTECTED]> To: beginners@perl.org Sent: Friday, June 29, 2007 10:42:56 AM Subject: processing XL using Win32::OLE Hi, Can anybody tell how to open an already existing x

processing XL using Win32::OLE

or die "Oops, cannot start Excel"; } # get a new workbook my $book = $ex->Workbooks->Add; my $Sheet = $book->Worksheets(1); $Sheet->{Name} = 'Candle'; $book->Close; Thanks Alok.

Re: parsing a line

Hi, So I tried something like this .It works ! if( $_ =~ m/ID\s=\s"(.*?)"\sDirAbsolute/){ print " Test ID is $1 \n" ; }else{ print " FAILED to locate Test ID \n" ; } May be its crude way. Thanks Alok. - Original Message From: Chas Owen

parsing a line

Hi, I am parsing a file which has lines like this. Got stuck up while trying to extract values of fields called Description, ID ? Pls help. Thanks Alok. Shape Yahoo! in your own image. Join

problem printing contents of file in directory

Hi, Can anybody tell me why its not printing the contents of each inside a particular folder ? I lost all my hairs scratching my head. Thanks Alok. my $tstToRunDir = "C:\\perlScripts" ; my $fileInTstToRunDir ; opendir TST2RUN, $tstToRunDir || die "Failed to open $tstToRunD

Reading a particular line from a file

Hi, Is it possible to read a particular line by line number ? For e.g reading line 3 from a file. I don't want to read each line and count. Thanks Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

RE: How to get the values

Thanks .It serves the purpose. -Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 20, 2007 12:42 PM To: beginners@perl.org Cc: Nath, Alok (STSD) Subject: Re: How to get the values Nath, Alok (STSD) wrote: > Hi, > I have a file from which I h

How to get the values

. Thanks Alok. while( <> ){ # print only if first character is not # my( $line ) = $_ ; chomp( $line ) ; if($line =~ m/^Par=/){ my @param ; @param = split( /\s+/,

Declaring constants in perl

Hi, What is the convention used to declare constants in perl ? In C we declare constant type in Capital letters , not sure how its in perl. Regards, Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

RE: Simplest hash initialization with no value

08 am, [EMAIL PROTECTED] (Alok Nath) wrote: > Why it gives syntax error when - > my @myhash{qw/A B/} = (); Er... because it's not valid syntax. That's why you'd get a syntax error. Not sure what you're asking. You can't "declare" a has

RE: Simplest hash initialization with no value

Jeff, Just another doubt - Why it gives syntax error when - my @myhash{qw/A B/} = (); It works when I say - my %myhash ; @myhash{qw/A B/} = (); Thanks Alok -Original Message- From: Jeff Pang [mailto:[EMAIL PROTECTED] Sent: Friday, June 01, 2007 3:21

RE: Simplest hash initialization with no value

Thanks Jeff. -Original Message- From: Jeff Pang [mailto:[EMAIL PROTECTED] Sent: Friday, June 01, 2007 3:21 PM To: Nath, Alok (STSD) Cc: beginners@perl.org Subject: Re: Simplest hash initialization with no value Nath, Alok (STSD) 写道: > Hi, > What is the simplest way to init

Simplest hash initialization with no value

Hi, What is the simplest way to initialize the hash keys with no values ? I know the crude form : %myhash =('A' => undef, 'B' => undef) ; Is there anything simpler than this ? Thanks, Alok -- To unsubscribe, e-m

Simplification of the code

} my @cards = td([EMAIL PROTECTED]); I am using the above for loops to create a table -finally. print table({-border=>undef,-width=>'100%'}, caption(b('My table')), Tr([EMAIL PROTECTED]), Tr([EMAIL PROT

Problem with Spreadsheet::ParseExcel

Is there any other module for reading excel files ? Thanks, Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Perl plugin for eclipse

Hi, Has anybody used any perl plugin for Eclipse ? Please share your thoughts. I am looking for one. Thanks Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Switching io redirection between display and file

Hi , Can somebody help me out ? I wanted to switch io redirection between log file and standard display device.Basically sometimes I want to print into a log file and other time to the display device. To redirect I am using this open (STDOUT, ">>

Logging module in RHEL distro

Hi, I am using perl which comes with RHEL distribution. I think the perl version is 5.8.5. I am not seeing any modules specific for message logging. Does it have any ? I am prohibited from installing any modules on top of my RHEL. Thanks Alok

RE: Killing a process created using system

n Wed, Apr 25, 2007 at 03:12:38PM +0530, Nath, Alok (STSD) wrote: > Hi, > Can I send a kill signal to a process which is created using > system call ? > > Basically I wanted to send a CTRL-C signal to the process > created by system call (of cou

Killing a process created using system

() { system (create process) now send kill signal ?? system (create next process) } Is it possible ? Thanks Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

Difference between $ and $$ in function defn

Hi, What is the difference between this two function defs ? When there is $ and $$ ?? sub test($$){ ... } sub test($){ ... } Thanks Ak -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mai

System call

Hi, Can somebody explain the difference between this 2 system calls ? system "grep 'fred flint' buff" system "grep", "fred flint", "buff" Thanks Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

RE: Calling bash things inside perl script.

"Test main \n" ; system (("/bin/bash", "test")) ; Its throwing this error : Test main /usr/bin/test: /usr/bin/test: cannot execute binary file Regards, Alok. -----Original Message- From: Nath, Alok (STSD) Sent: Tuesda

Calling bash things inside perl script.

this.I did a cpan search but did not find anything helpful. Any idea how to do this ? Thanks Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Perl versus other scripting language

what they offer. Can somebody throw your opinion please ? Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

RE: Need to extract only the function name no brackets reqd.

Jeff, It is returning just 1.I think the result of the expression. -Original Message- From: Jeff Pang [mailto:[EMAIL PROTECTED] Sent: Friday, March 30, 2007 2:53 PM To: Nath, Alok (STSD); beginners@perl.org Subject: Re: Need to extract only the function name no brackets reqd

Need to extract only the function name no brackets reqd.

} } print "\n\n" ; close(FILE) ; } } print RES "Total Functions : $funcCount \n" ; close RES ; closedir DIR ; Thanks Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Automating a perl script by another perl script

Hi, I have a perl script which prompts user for certain inputs. I want to automate this by creating a separate script which runs the above perl file and probably passing the inputs in a separate text file. Can anybody give me some pointers or how to do this ? Thanks Alok

RE: Perl test tools

My requirement is something which run a suite of commands, results reporting. Also remote job launching, getting the results and probably displaying on a web. Something like that. Thanks Alok. -Original Message- From: Jeff Pang [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 06, 2007

Perl test tools

Hi, Is there any open source test frameworks or test tools in perl ? I did some googling and found lot of test tools in other languages but not anything good in perl. Does anybody know about it ? Thanks Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

How to do it in the client side

side . Thanks, Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

File locking issue

doing wrong . Regards, Alok use XML::Twig; use Fcntl qw(:DEFAULT :flock); my $registerFile = "Register.xml" ; my $twig = XML::Twig->new( pretty_print => 'indented' ); # Save data into the xml file my $

Very dangerous code

::twig module to save the data. Sometimes I have observed while saving the data the explorer crashes.If the XML is opened it will definetly crash probably while writing into it. Can anybody point out what is wrong ? Thanx, Alok my

Designing forms/tables in CGI

. Please advise. Thanx, Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Vertically aligning textfields when using CGI

to start under a particular column. I am using perl::CGI module to draw the form. Can anybody let me know how to do it ? Thanx, Alok sub generate_form{ print $cgi->startform(-method=>'Get') ; print $cgi->br(),

File locking with XML processing

I am using XML::Twig module (print function) to write into the file. I am using XML::Twig to process the CGI input and store it in XML. Thanx, Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <h

RE: Writing to XML using XML::Writer

is fine. Thanx, Alok -Original Message- From: Robin Norwood [mailto:[EMAIL PROTECTED] Sent: Wednesday, August 09, 2006 8:23 PM To: Nath, Alok (STSD) Cc: beginners@perl.org Subject: Re: Writing to XML using XML::Writer "Nath, Alok (STSD)" <[EM

Writing to XML using XML::Writer

. Thanx, Alok use XML::Parser ; use XML::SimpleObject; use XML::Writer; use IO::File; my $xml = "Inventory.xml" ; my $parser = XML::Parser->new(ErrorContext => 2, Style => "Tree"); my $xso = XML::SimpleObject->new( $parser->parsefile($xml) ); # Reading an

Issues in CGI script

element in the table. If anybody can review and provide comments for improvement that will be great. Thanx, Alok. -- Table code snippet : --- print $cgi->table( $cgi->Tr( {

RE: Same Internal Server Error from last two days

No the script is in C:/Program Files/Apache Software Foundation/Apache2.2/cgi-bin. -Original Message- From: Beginner [mailto:[EMAIL PROTECTED] Sent: Friday, July 28, 2006 6:01 PM To: beginners@perl.org Subject: Re: Same Internal Server Error from last two days On 28 Jul 2006 at 14:13, D

RE: Same Internal Server Error from last two days

Ramnish, I have tried that.No success ... Thanks, Alok. -Original Message- From: Ranish George [mailto:[EMAIL PROTECTED] Sent: Friday, July 28, 2006 5:10 PM To: Nath, Alok (STSD) Cc: Mumia W.; Beginners List Subject: Re: Same Internal Server Error from last two days Nath

RE: Same Internal Server Error from last two days

07/28/2006 02:25 AM, Nath, Alok (STSD) wrote: > Ramnish, > Here's my Hello World Cgi script which I am trying to run > > #!/usr/bin/perl > print "Content-type: text/html\n\n"; > print "Hello, World."; > > It has no problem. > [...] When apache

RE: Same Internal Server Error from last two days

Ramnish, Here's my Hello World Cgi script which I am trying to run #!/usr/bin/perl print "Content-type: text/html\n\n"; print "Hello, World."; It has no problem. Thanx, Alok. -Original Message- From: Ranish George [mailto:[EMAIL PROTECTED] Sent: Friday,

Same Internal Server Error from last two days

port 5. Different machine 6. Different version of perl ie 1.3 7. Saving the .pl file in text mode using textpad. But none of this is helping me. I am attaching the httpd.conf also.Any help will be greatly appreciated. Thanx, Alok # # This is the main Apache HTTP server configuration file

Modification of table -limited by programming constraint

Hi, In my current program I am not sure where to use rowSpan so that I create table like below. In otherwords, I want switch 1 to appear once only for the two rows. My main constraint is I dont want to change the program style to create such a table . Any help will be greatly appreciated. |--

RE: Want to start remote desktop thru the CGI script

Thanx Tom, for clarification. ~Alok. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Tom Phoenix Sent: Tuesday, July 04, 2006 10:34 PM To: Nath, Alok (STSD) Cc: beginners@perl.org Subject: Re: Want to start remote desktop thru the CGI script On

RE: Want to start remote desktop thru the CGI script

Thanx bs for clarification. ~alok -Original Message- From: Bjørge Solli [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 04, 2006 10:27 PM To: beginners@perl.org Subject: Re: Want to start remote desktop thru the CGI script Please reply below the text you are answering, it makes the

RE: Want to start remote desktop thru the CGI script

elnet session.The same way it cannot do that ??? Just clarifying.. ~Alok -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Tom Phoenix Sent: Tuesday, July 04, 2006 9:15 PM To: Nath, Alok (STSD) Cc: beginners@perl.org Subject: Re: Want to start remote desktop thr

Want to start remote desktop thru the CGI script

ody help me how to do this ? Thanx in advance, Alok. #!/usr/bin/perl -w use CGI ; use strict ; my $cgi=new CGI ; print $cgi->header() ; print $cgi->start_html() ; my $machine ; # Body Part print $cgi->table({ -border=>5,

RE: Trying to add hyperlink

Thanx Clarles.This code is really cool. I was looking something like this . -Original Message- From: Charles K. Clarkson [mailto:[EMAIL PROTECTED] Sent: Thursday, June 22, 2006 10:22 PM To: beginners@perl.org Subject: RE: Trying to add hyperlink chen li wrote: : How to convert the fo

RE: Trying to add hyperlink

Hi Prabhu, Your guess is right.For each box it should go to a different link. For e.g my references are like this. href="https://192.10.11.12. I want my code to be slightly simple. Thanx, Alok. -Original Message- From: Prabu [mailto:[EMAIL PROTECTED]

RE: Trying to add hyperlink

Hi Prabhu, Is there any simple way of doing it.Bcos this looks like user has to type a lot. Perl is known for its simplicity I suppose. Thanx, Alok. -Original Message- From: Prabu [mailto:[EMAIL PROTECTED] Sent: Thursday, June 22, 2006 12:06 PM To: Nath, Alok (STSD) Cc

Trying to add hyperlink

7;,'Bay 2','Bay 3' ,'Network Switch' ]), th('Enclosure 1').td(['Bl20p G2','yes','yes']), th('Enclosure 2').td(['no','no','yes']) ] ) ); end_htm

CGI script not showing the textbox

--- >>>>>>>>>> What I was expecting is a textbox, instead of this string. "Please select: ",textfield ("flavour", "mint") Can anybody point out what is wrong ? Thanx, Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Function call problem

: $host: [EMAIL PROTECTED]"; $ftp->login($user, $pass) or die "Could not login as $user/$pass\n"; $ftp->binary; $ftp->hash; # Show the ftp directory contents foreach ($ftp->ls($ftpDir)) { print $_."\n" ; } } Thanx, Alok -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Unable to read timestamp for remote files

for each files in the remote folder. Can somebody point out what is wrong exactly or any alternative ?? Please help !! ~Alok { my ($host, $ftpDir) = @_; my $user = "ftp"; my $pass = ""; my $ftp = Net::FTP->new($host) or die "Could not ftp to

Find and replace problem

_changed/g ; print DATA $_ ; } } close(DATA) ; } What is happening is its appending the result on the original file.I just one that line to be changed ? Please let me know what I am doing wrong. Thanx, Alok.

Error message >The process tried to write to a nonexistent pipe.

the below code. Thanx, Alok sub ExecCmd{ $cmd = "dir" ; print "before executing .. $cmd\n" ; @Output = `cmd` ; print "after executing ..$cmd\n" ; LogMessage("Executing $cmd"); foreach my $line (

Problem reading data from an HTML file

Can anyone point out why it is not outputting anything ? It is suppose to read an HTML file and display the table contents. One thing I observed is - It is not entering the for loop and I s not printing anything ( in print "Table found at ", join(',', $ts->coords), ":\n";) #!/usr/bin/perl u

Parsing and HTML file

Hi all, I want to read the data from an HTML file say Test.htm.For that I want to use HTML::TableExtract. Can anybody send me some pointers to write the script or give me some sample script ? Thanx, Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

Unable to use XML module

ROGRA~1/MKSTOO~1/etc/perl /lib C:/PROGRA~1/MKSTOO~1/etc/perl/lib C:/PROGRA~1/MKSTOO~1/etc/perl/lib/site_pe rl .) at XMLRead.pl line 3. BEGIN failed--compilation aborted at XMLRead.pl line 3. Pls suggest me how to get rid of this ? Thanx,

A small problem

? Any help will be greatly appreciated ? Thanx, Alok. #!/usr/bin/perl $testFile = "TestTemplates.txt" ; open(DATA, $testFile) || die "Unable to open file" ; @test = ; foreach $val (@test) { chop ($val) ; ($val1, $val2) = split(/\,/,$val) ; pr

Parsing and HTML file and then creating MS-Excel out of it.

Hi all, Can anybody send me some pointers for reading an HTML file and then creating an excel file ? Basically what I want to do is read the data in the HTML file and then create and MS-Excel out of it. Thanx, Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands

Re: Question about writing to excel file

Hi All, I think I found the answer (checking at previous posts), I think I am going to use Spreadsheet::WriteExcel. Thanks, Alok --- Alok Bhatt <[EMAIL PROTECTED]> wrote: > Hi All, > > I am writing a script (needless to mention that it > is > in perl :)), that would r

Question about writing to excel file

the CPAN and there were lots of modules related to writing to excel file. Please let me know to proceed... Thanks in advance. Alok __ Yahoo! Mail Mobile Take Yahoo! Mail with you! Check email on your mobile phone. http://mobile.yahoo.com/learn

Running perl code through ssh

Hi All, I need to run a perl script, which ssh'es to another box and has to run some code, which is given in the present script and return some value. Is that possible? Net::SSH doesnt seem to be the answer as it merely runs a command at the remote host. Thanks,

Keeping track of a variable

Hi All, Can someone please tell me how do we keep track of a variable. ie Whenever a particular variable is accessed (printed, incremented etc.), a counter should increase, so that we can know how many times it has been accesssed. Thanks in Advance, Regards, Alok

Re: DBD for SQL Server?

l. You can connect to an MS-SQL server using Win32::ODBC, available at http://search.cpan.org/~gsar/libwin32-0.191/ODBC/ODBC.pm More info - perldoc Win32::ODBC HTH, Alok __ Do you Yahoo!? Yahoo! Movies - Buy advance tickets for &#

Re: Array in a regexp

--- Alok Bhatt <[EMAIL PROTECTED]> wrote: > > --- Jason Dusek <[EMAIL PROTECTED]> wrote: > > Hi List, > > But if I have a long list of suffixes, then I > would > > like to store the > > suffixes in an array, and then evaluate the array > in >

Re: Array in a regexp

= (fish,foul); >foreach (@ARGV) { > print if (/\.(@SUFFIXES)$/); >} > > and also: > >@SUFF = (fish,foul); >foreach (@ARGV) { > print if (/\.(@[EMAIL PROTECTED])$/); >} Hi, try this my @suffix=(txt, jpg, tif); my $pattern= join "|", @

Re: Perl Scripts examples

es. Hi, the examples from Learning perl are available at: http://examples.oreilly.com/lperl3/llamasamp.zip the examples from Programming perl are available at: http://examples.oreilly.com/pperl3/examples.zip This info is also given on oreilly books. Alok ___

Re: Variable "$some_var" will not stay shared

s a nested sub-routine. So the first-time it is called, both it and the calling func (_main) will refer to the same variable. But when it is called the next time, it will access its own copy of the two variables ($arg1 and $arg2) and hence the error message that the variables will not

Re: System (" ");

match a regex. You should escape them, so that perl does not subsitute them beforehand and awk sees it properly. system("date|awk '{print \$2,\$3}'"); Rgds Alok __ Do you Yahoo!? Win a $20,000 Career Makeover at Yahoo!

Re: Date problem

Hi, Thanks everyone for the answer. So silly of me. Didnt check the docs :$ --- Patrick Heffernan <[EMAIL PROTECTED]> wrote: > > On Mon, 26 Apr 2004 06:07:03 -0700 (PDT) > Alok Bhatt hammered out: > > > I am facing this strange problem related to dates. > &g

Date problem

Hi All, I am facing this strange problem related to dates. When I print the date using the system's date command, it prints correctly. But when I do the same using localtime, it shows the month as wrong (1 month previous. bash-2.03$ perl -e '@a=localtime; print "@a\n"' 18 4 8 26 3 104 1 116 0

Re: Help in using Modules

o any of those directories. If the module needs to be installed, You will have to use the proper process to install the module. Just untar the module and read the README file. But I think, it should not be that difficult. Alok Bhatt __ Do you Yahoo!? Yahoo! Small

Generating a chart/graph for comparison

me know, which would be the best module to handle this scenario. Thanks in advance. Alok __ Do you Yahoo!? Yahoo! Small Business $15K Web Design Giveaway http://promotions.yahoo.com/design_giveaway/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

Re: Execute include and return variables

In FIle2: do "FILE1.pl" (use double quotes) If you want to use "use ", rename xxxx to file1.pm and use "use file1", instead of "use file1.pm". Hope that helps. :-) Alok __ Do you Yahoo!? Yahoo! Finance Tax Center - Fi

Re: warn ?!

ne no. too) :-) Alok Bhatt --- Jayakumar Rajagopal <[EMAIL PROTECTED]> wrote: > Hi, > In my program , $sth->execute fails since > oracle tables already present. It is very natural. > But the waring message output line 37 is > different(just behaves as print) from same