erezschatz

I am working on a perl code that reads in a file with various information (example: ID, value A, value B, value C..Value Z) The file values are separated by tabs. I want to only extract the first 3 columns (ID, value A, value B) and output it to another …

Hi Perl Guru's I have a requirement where i need to find out two patterns and second pattern is dependent on first pattern (i.e., if file1 have pattern1 the serach pattern2 in file1). Let me explain in detail. Forexample: I have last three days job logs (Infact logs folder have …

Hi, I have start and end time like this: [CODE] $start = "Wed Apr 27 03:57:21 EDT 2011" $end = "Wed Apr 27 03:58:42 EDT 2011" [/CODE] I need to compute the exact time taken some thing like 2 hours or 1 min. I have to do this with out …

hello all, i am getting the following error when i am trying to run my 1st Perl script: [CODE][id=0 @ 0] : IP address "3.3.3.3" corresponds to device "core". Thread 1 terminated abnormally: Not a CODE reference at ./dev_ithread.pl line 23. [id=0 @ 1] : IP address "5.5.5.5" corresponds to …

Hi, I want to download multiple files from the server/web to the folder I choose before (I already know the exactly link and know parser), but I don't know how to "download a file" with Perl. So, anyone helps me how to download file with Perl (give me detail about …

Hi Perl Masters, I have a requirements where i need to execute the particular part of code in weekdays (from Moday to Friday & Saturday) and some part on (Sunday)but i don't know that how to check the current day in perl. Like if current day is in between monday …

Hi Perl Gurus, I have a text which look like 20 Dec 2010 | Completed | ABC 20 Dec 2010 | Completed | DEF 20 Dec 2010 | Completed | GHI 19 Dec 2010 | Completed | JKL You can see that the file have three columns first column is …

Hi all, Once again I would like to seek your help. I got one file (test.hrh) with a number of flags. Some falgs are defined (#define), some not (#undef). I got another file which a flag list which should be added to the file if not there, and if exists …

Can anyone give suggestion about Perl Script for Automation Testing(check http request & response).with some sample code.

I am confused about the storable module in Perl. In the available documentation for it [URL="http://perldoc.perl.org/Storable.html"]http://perldoc.perl.org/Storable.html[/URL], it doesn't describe much about the file that it uses to store the data structure. What kind of extension is the file? When I create a file for the module to use, do I …

Hi Perl guru's My name is ABHI and i am almost new on perl i need help for below mentioned issue. Well, I have one file(xyz.txt) containing following text LT19-10-13-400922 --TID1-3039@10.100.14.163 1--RequestREGISTER LT19-10-13-405432 --TID1-3039@10.100.14.163 1--Response100 LT19-10-13-410015 --TID1-3039@10.100.14.163 1--Response401 LT19-10-13-415481 --TID1-3039@10.100.14.163 2--RequestREGISTER LT19-10-13-419800 --TID1-3039@10.100.14.163 2--Response100 LT19-10-13-426400 --TID2-3039@10.100.14.163 1--RequestREGISTER LT19-10-13-463320 --TID3-3039@10.100.14.163 1--RequestREGISTER …

This is the contents of the file, of which I want to insert multiple lines after </module-data> if the process-type=Remote. Could you please help !! [CODE] --------------------------FILE------------------------------------------ <process-type="Local"> <module-data> </module-data> <process-type="Remote"> <module-data> </module-data> --------------------------FILE------------------------------------------ [/CODE]

Hey everyone, Relatively new to Perl and had a quick question. Is it possible to assign a SQL query result to a variable? The query will always return a single interger result. This is what I have thus far: [CODE] use DBI; use DBD::DB2::Constants; $dbh = DBI->connect("dbi:DB2:SLOGAN","","") or die "Cannot …

Hello, I would like some help if anyone can. I have researched, research and I just cant do it anymore - I have to ask. Before I do, I know this is probably a simple answer, and your fed up of explainng it but from my research (lots) the example …

Hi, I have encounter a strange result couldn't figured out. # Str with format "Mon MM HH", try to skip leading space in DD. my $str = "Jan 8 11"; # Jan, 8th 11 o'clock print substr($Str, 0,3) . [B]substr($Str, 4,2)=~s/^\s+// [/B]. substr($Str, 7,2) . "\n"; The result is "Jan11", …