compare and replace each line with Hash

hash and want to replace string name to respective id. for example: 159350,PP02,1,0,1 159349,B02_bkp,1,0,1 159347,B02_bkp,1,0,1 159346,B02_bkp,1,0,1 159345,B02_bkp,1,0,2 159344,02_bkp,1,0,1 Any pointer would be greatly *appreciated. Thanks for your time. Thanks Mohan L *

Re: How to do ssh connection from client-to-remote machine1-to-remote machine2-to-remote machine3 and execute command on remote machine3

. Any thoughts/example code to handle this scenario. Thanking you, -- Sasikanth Hi Sasikanth, Have you tried Expect perl Expect module ( http://search.cpan.org/~rgiersig/Expect-1.15/) ? Thanks Mohan L

Re: Recommended config/ini file module?

$mysql_database = $database{mysql_database}; my $mysql_username = $database{mysql_username}; my $mysql_password = $database{mysql_password}; my $mysql_socket = $database{mysql_socket}; Thanks Mohan L

Re: Manipulating reference to array of array references

guidance. Thanks Rg Mohan L

Manipulating reference to array of array references

I want is, I want to replace all 'undef' to a string 'foo'. What is the efficient way I will replace it (the array is larger then what I am showing above). Any help and explanation will be appreciated. Thanks Rg Mohan L

Re: perl code to export data to excel

, then you can use the example code in the above link. Thanks Rg Mohan L

Re: help to print a hash with hash

How to insert below data structure in data base? #!/usr/bin/perl use strict; use warnings; my %data = ( south = { status = { open = { count = 3 }, pws = { count = 3 }, wip = { count = 0 }, hold = { count = 1 }, 're-open' = { count = 0 }, pwu = { count = 0 }, openesc

Re: help to print a hash with hash

On Wed, Jul 20, 2011 at 9:23 PM, shawn wilson ag4ve...@gmail.com wrote: On Wed, Jul 20, 2011 at 10:41, Mohan L l.mohan...@gmail.com wrote: DBD::mysql::st execute failed: Column 'open' cannot be null at ./demo.plline 104, CSV line 30. DBD::mysql::st execute failed: Column 'open' cannot

Re: help to print a hash with hash

= $region_data{ $region }; @mydata= join( ,, $region,map( $d-{ status }{ $_ }{ count }, @statuses_string ),$d-{ total_count },); push(@dbdata,@mydata); } Thanks Rg Mohan L

Re: summarise input data using Perl

at ./demo.pl line 29, near File Thanks Rg Mohan L

Re: summarise input data using Perl

at ./demo.pl line 29, near File Hi Leo, Sorry . The below line works fine. It is {count}++ $region_data{ lc($columns[3]) }{status}{ lc($columns[0]) } { count}++; $region_data{ lc($columns[3]) }{total_count}++; Thanks for you time !!!. Thanks Rg Mohan L

help to print a hash with hash

to print next level. I need someone help to point right direction. Thanks Rg Mohan L

Re: help to print a hash with hash

' ,'0', '7' ], ) It will solve my problem. I hope this time I am clear. Thanks Rg Mohan L

summarise input data using Perl

{ my $err = $csv-error_input; print Failed to parse line: $err; } } InsertByRegion; print The END!!!\n; close CSV; Thanks for your time. - Mohan L

summarise input data using Perl

{ my $err = $csv-error_input; print Failed to parse line: $err; } } InsertByRegion; print The END!!!\n; close CSV; Thanks for your time. - Mohan L