RE: How to change the value of a Hash Key

Hi Thomas, Thanks for your reply. I want to accomplish some thing like this... %hash = ( "abc" => "mallik", "xyz" => "arjun", "mno" => "priya" ); Need be changed to %hash = ( "123" => "mall

How to change the value of a Hash Key

27;4', 'parentMdfId' => '268436078', 'count' => 0, 'link' => 'Linear_with_Optical_Add_D_279524369.html' }; Here, the key is 'Technologies':'Optical':'Dense Wavelength Divisi

RE: Errors while inserting into long data type

Hi Philip, Thanks for your reply. It worked with bind_param. I have one more question, how to set the LongReadLen parameter in a perl script? Thanks, Mallik. -Original Message- From: Philip Mikal [mailto:[EMAIL PROTECTED] Sent: Monday, April 11, 2005 11:36 PM To: 'Mallik

Errors while inserting into long data type

: OCIStmtExecute) at MT/TACDbManager.pm line 445. Whereas we can insert upto 2GB of data in long data type. Pl. help me out to solve this. Thanks & Regards, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/

Multiple file upload

ttons multiple times to upload multiple files (no. of files may be more than 10 or so). So, we want to avoid multiple file upload fields on the page. FYI, Our application is in Perl. Any suggestion on this is highly appreciated. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROT

RE: Verify that a directory exists.

if (-d ) { print "Directory exists\n"; } -Original Message- From: Carlos Mantero [mailto:[EMAIL PROTECTED] Sent: Monday, February 28, 2005 5:09 PM To: Perl BG Subject: Verify that a directory exists. Hi all, I'm a begginer in Perl and other programming languages. I want to veri

RE: Perl waits for while to finish before printingifonthesameline,why?(countdown prog)

I am using it as a command line tool. I have perl configured in Edit Plus. Thru edit plus, it is not working as expected, where as from command line, it is working fine. Mallik. -Original Message- From: Manav Mathur [mailto:[EMAIL PROTECTED] Sent: Monday, February 21, 2005 1:28 PM To

RE: Perl waits for while to finish before printing if onthesameline,why?(countdown prog)

Hi Manav, Same code is working as expected in Unix OS, but not in Windows. Thanks, Mallik. -Original Message- From: Manav Mathur [mailto:[EMAIL PROTECTED] Sent: Monday, February 21, 2005 1:17 PM To: Mallik; beginners@perl.org Cc: 'Mark Jayson Alvarez' Subject: RE: Perl waits

RE: Perl waits for while to finish before printing if on the sameline,why?(countdown prog)

Still the result is same. -Original Message- From: Manav Mathur [mailto:[EMAIL PROTECTED] Sent: Monday, February 21, 2005 1:11 PM To: Mark Jayson Alvarez; beginners@perl.org Subject: RE: Perl waits for while to finish before printing if on the sameline,why?(countdown prog) Try this m

RE: Problem in reading cookies

;s why the 2nd application is not able to read the cookies in the 2nd system. The browser is IE 6.0 and the settings are same in both the systems. We are not able to trace the problem. Any help in this regard is greatly appreciated. Hope I have given required information. Thanks, Mallik. ---

Problem in reading cookies

variables in that script. The variable HTTP_COOKIE is printed in first system but not in the other system (where it is not able to read the cookies). What could be the reason for this? Any help in this is greatly appreciated. Thanks & Regards, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTE

Problem in reading cookies

variables in that script. The variable HTTP_COOKIE is printed in first system but not in the other system (where it is not able to read the cookies). What could be the reason for this? Any help in this is greatly appreciated. Thanks & Regards, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTE

RE: How to find the Index of an element in array?

Hi, Thanks for ur reply. Is there any function instead of looping thru entire array. Mallik. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Thursday, January 27, 2005 1:06 PM To: [EMAIL PROTECTED]; [EMAIL PROTECTED] Cc: beginners@perl.org Subject: RE: How

How to find the Index of an element in array?

I need to find the index of a particular element in array. For eg., @arr = ('abc', 'xyz', 'mno','pqr','stu','sdfd'); I want to find the index of the element 'pqr' which is 4. Any function/code to achieve this. Thanks

Strange Output

Why it is behaving strangely? Any idea? Thanks is advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

NCR to Shift JIS

Hi all, I have a requirement whrein i need to convert the NCR values representing Japanese characters back into the Shift_JIS equivalent characters. Is there a Perl code/module available for the same. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

NCR to Shift JIS

Hi all, I have a requirement whrein i need to convert the NCR values representing Japanese characters back into the Shift_JIS equivalent characters. Is there a Perl code/module available for the same. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

RE: Deleting the records from a table

Hi Jose, Thanks for your prompt reply. I too thought of same solution, but we don't want to delete the original table. Any other solution is greatly appreciated. Thanks & Regards, Mallik. -Original Message- From: José Pedro Silva Pinto [mailto:[EMAIL PROTECTED] Sent: Tuesday,

RE: regexp for a blank line

Its simple. next if ($line =~ /^\s*$/); Mallik. -Original Message- From: Christopher Spears [mailto:[EMAIL PROTECTED] Sent: Tuesday, December 14, 2004 11:14 AM To: [EMAIL PROTECTED] Subject: regexp for a blank line I have to write a script that processes text in a file. The text

Deleting the records from a table

les containing millions of records in a loop. i need to implement this in perl, with DBI-informix interface. Thanks in advance, Mallik.

RE: Getting the dir structure

u can look at the below code. use File::Basename; while(){ my $line=$_; chomp; my $dir = dirname($line); print "$dir\n"; } -Original Message- From: Owen Cook [mailto:[EMAIL PROTECTED] Sent: Thursday, December 02, 2004 2:44 PM To: perl beginners Subject: R

RE: Comparing two directories

I think the code can be further optimized without traversing through 2nd directory as below. opendir RD,"." or die "ERROR: $!\n"; my $dir2 = "../"; my @DIR1 = readdir RD; foreach my $filename (@DIR1) { next if $filename =~/^\./; my $fname = $dir2 . $filename; if (-e $fname) { print "$file

RE: Reg Exp

Hi David, Thanks for ur suggestion. But I am a new-bie to Perl. Can u give me a example for 'look-ahead' matches. Regards, Mallik. -Original Message- From: David le Blanc [mailto:[EMAIL PROTECTED] Sent: Tuesday, October 05, 2004 5:57 PM To: John W. Krahn Cc: Perl Beginners S

Reg Exp

de is working fine. But when I change the text in $a like below $a = ":-:m:-:a:-:l:-::-:k"; # Here I removed the letter l between two '::'s Now the code is not working properly. Any help in this is appreciated. Note: There may be non-alpha numeric chars between ':-:&#

Search and Replace

Dear Friends, I have the below string. $str = "iabd a bdkf a kdfkj akdfakjkf"; I want to replace all the 'a' s prceeded and followed by spaces with 'A'. The output should be like this $str = "iabd Abdkf A kdfkj akdfakjkf"; Any easy reg exp?

RE: How to read a pdf file in perl

Hi Dani, By the OS is AIX, similar to UNIX. So, is there any module to install in AIX (UNIX) and read the pdf file. Thanks, Mallik. -Original Message- From: Dani Pardo [mailto:[EMAIL PROTECTED] Sent: Friday, May 14, 2004 1:57 PM To: [EMAIL PROTECTED] Cc: Mallik Subject: Re: How to read

How to read a pdf file in perl

Dear Friends, I want to parse a pdf file as we do for text files using perl. Can anyone help me out? Thanks, Mallik. - Yahoo! Messenger - Communicate instantly..."Ping" your friends today! Download Messenger Now

How to add CPAN in PPM Repository

l DBD::Oracle Missing base argument at c:/Perl/site/lib/PPM/Repository.pm line 174 Please help me to configure CPAN in repository and install DBD::Oracle directly from PPM. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <

Creating Menus in CGI

Dear Friends, How to create menus using Perl CGI? Any help in this regard will be great. Thank you, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Passing array as First argument

nt "x $x\n"; print "y $y\n"; } The output of the above code is Array 1 2 3 4 5 x y As seen above, all the parameters are assigned to the array. So, how can get the values into x and y. Thanks in advance. Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional comm

Passing array as First argument

nt "x $x\n"; print "y $y\n"; } The output of the above code is Array 1 2 3 4 5 x y As seen above, all the parameters are assigned to the array. So, how can get the values into x and y. Thanks in advance. Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional comm

Virtual Directory Problem

ith the URL http://192.168.0.10/fsuser/cgi-bin/help.htm Thanks, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

map?

I couldn't understand the functionality of map in PERL. Is there anybody to help me? Thanks, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Use and Require

Dear Perl Gurus, What is the difference between Use and Require. Thanks, Malliks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

What is eval?

Can anybody explain the functionality of eval in brief? Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Formatting the decimals

Dear Friends, How do I format the decimals, i.e, if there is no decimal part, then add .00, if there is one decimal, then add '0'. For eg., how to convert 123 to 123.00 and 123.5 to 123.50. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional comman

RE: Automated script to connect to a web site and change the Password

Dear Friends, I need to write a Perl CGI script that connects to a website (like Yahoo) and change the Password for my user. I don't want to do it manually. It should be handled by the script. Please suggest any idea/code available. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [

Automated script to connect to a web site and change the Password

Dear Friends, I need to write a Perl CGI script that connects to a website (like Yahoo) and change the Password for my user. I don't want to do it manually. It should be handled by the script. Please suggest any idea/code available. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [

RE: Automated script to connect to a web site and change the Password

Dear Friends, I need to write a Perl CGI script that connects to a website (like Yahoo) and change the Password for my user. I don't want to do it manually. It should be handled by the script. Please suggest any idea/code available. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [

Day of the week by accepting date from User

Dear Friends, How to calculate the Day of the week for a given date in PERL. Please provide me any code available that doesn't require any other modules to be installed. Thanks in advance, Mallik. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROT

Regarding unless in Perl

Dear Friends, I have the following code unless(-d $dir) { unless(mkdir $dir) { print "Error\n"; } } Can I rewrite the above code in the following way unless (-d $dir | mkdir $dir) { print "Error\n"; } Thanks in advance, Mallik. -- To unsubsc

Regular Exp for Numerics

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

Regular Exp for Numerics

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

Please wait while I get your data ...

solution you are looking for. If you find any, pl. forward us. NOTE: Database is Informix and we are using Perl CGI. Thanks, Mallik. -Original Message- From: Bill McCormick [mailto:[EMAIL PROTECTED] Sent: Thursday, December 18, 2003 9:42 PM To: Cgiapp Subject: [cgiapp] Please wait while I get

Database Paging using CGI Perl

Dear Friends, I am using Informix database. I want to implement database paging concept on Informix using CGI Perl. Please provide me any sample code. Thanks in Advance, With Regards, Mallikarjun. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]