Perl Forum

How can I recurse into multiple directories (in windows) and search for all the strings which starts from a particular name. (ex : all strings starting from "perl_") and copy the whole line to a new file. Thanks for any pointers (existing websites?)

unable to print the % values outside the loop foreach(@pusharray) { $_=~ s/(\s)*$//; %diskraid_Info = split(/\s*: /, $_); %diskraid_Info_final = %diskraid_Info; }

hello bytes friends, I am trying to run simple perl script with linux command where I am using 'awk' command and my perl script is ------------------------------------------------ #!/usr/bin/perl -w use strict; while (my $line =<>) { chomp $line;

Hi could anyone guide to convert the below expression as integer $number="(3+4)*(5+6)";

I have a program which uses the system() function to call a command line program, then using the system() again to call another. the first one works without issues, the second one just hangs on the "system(....)" statement with no errors or anything else. Any one have any ideas??

How to populate a dropdown based on the selection of an item in another dropdown using perl???

Hello everyone! I am still learning (TONS every day) and having an absolute blast. Unfortunately, I have an issue that is puzzling and bewildering me. Seeing as how the best way to learn is to re-invent the wheel, I am trying to write a script to validate an IP address (IPv4) as valid. I am only in the first part of this, where I validate...

Hi I am new to Perl, could you please help in how to open a XML file and append data to it. XML File: <?xml version="1.0" encoding="ASCII"?> <componentmanifest.application:ApplicationConfiguration xmi:version="2.0" xmlns:xmi="http://www.omg.org/XMI" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"...

Hi All: I am new to Perl. I need to open a XML file and add few data in it using PERL. Could you please help me? XML File: <?xml version="1.0" encoding="ASCII"?> <componentmanifest.application:ApplicationConfiguration xmi:version="2.0" xmlns:xmi="http://www.omg.org/XMI" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"...

Hi, I have to modify and use parallel processing for a large and complex system which is implemented in Perl. Each child process or threads are supposed to use memory around 1 GB each and will run for around 1-3 hours on Solaris Server. My question is - what is your recommendation - use of ithreads or multi processing using fork(). 100s of...

I wanted to grep the IP address from this following exception. What is the easiest way to do this? "var=something.something.somthing.Exception : The IP xx.xxx.x.xxx cannot be used" I want to grep the IP address from this string and store it in a different variable. Do i just use the regular regex pattern to grep an IP address or is there...

Hi dude, I want to compare 2 xml files.Initially, I had used SemanticDiff module then i didn't get any problem.Its, work fine.While I was included special char in xml file like &=!,etc.,which give me an error like..(invalid token....) Anyone give me solution for my query. Thanks, UMA

Hi I have a perl script placed in the server! i would like to know as how i will b able to access it from my mobile phone and run on my mobile phone! please do help! Thanks in advance! Regards sindy90

Dear PERL friends, would be very grateful for a solution: I want to hand over arguments to a .dll function per reference but seem to fail somehow. I have self-explaining (hopefully) comments in the code. Thanks again, Fabian

I am using the following code to create an excel file on the share on the remote win2007 professional. use Win32::OLE qw(in with); use Win32::OLE::Const; use Win32::OLE::Variant; use Data::Dumper; use Win32::NetResource my $Excel = Win32::OLE->GetActiveObject('Excel.Application') || Win32::OLE->new('Excel.Application','Quit');

Hi Guys, I would like to skip a line from my database.... this is how the line starts: A.SERIAL_NUMBER||' I'm using the following code, but it doesnt seem to work, what am i doing wrong?ps. i want to ignore this line and let the data to be added to the database........ if(substr($data,0,length("A.SERIAL_NUMBER||")-1) ...

Hi! I am automating one web application using perl and selenium which works irrespective of browser. As the selenium is built to work entirely on web technology,it can not handle dialog box or save as window. so autoit is the tool which can be used with perl to handle dialog box. Here is the autoit script which handles dialog box. f...

Hello All, I am using SUN Solaris & written a perl script. I want to convert the perl script into exe file. Can anybody tell me the procedure how to convert the perl file to exe file. Thanks

Hi, I have a problem on connect to MYSQL database. Below is my code: use strict; use warnings; use DBI; my $dbh = DBI->connect('DBI:mysql:MYDB', 'andres', '123' ) || die "Could not connect to database: $DBI::errstr";

I would like to search and replace an xml file with the ini content, but i am getting incorrect answer in my bb.xml with the same regular expression syntax without replacement. My ini file ----------- myPara para lPara last_para <mySeca>(+). <sec id=\"$1\"> My XML file. -----------

What code is necessary to have PERL send to the mail server the RMS (Rights Management Service) option to “Do Not Forward”? This options allows for the message to be distributed to a set number of users and distribution lists, but does not allow the recipient to forward the message to any user or community.

Hi, I am dealing with running macros through perl. i have following script to do the same which is working fine.Now what i have to do is to make one .xlsm (macro-enabled file)which will contain all the needed macros. and i need to call that macros from another .xlsx file. I am trying to give path in that RUN() rather than macro...

HI!, i am comparing two excelsheets, 1.one of which contains the data exported from database and 2.one which i will download from application. The excelsheet which i am going to get from application will be in .csv format. and the data from the database will get exported in excel will be in .xlsx format.

I need to print files in a Windows directory by file creation time, not by file name. I am using the Net::SFTP::Foreign. I tried to use "ordered => 2" on $sftp->ls but the files are still printed by file name. I really appreciate if anyone can help. Below is the code. $sftp->ls('myDirectory', ordered => 2, wanted => sub { if (...

So I'm working on a program where I need to parse multiple XML files and return their attributes in a readable format. Currently the script parses all of the files and stores all the details for each file at each position of an array. An example of the desired output for each line would be: J MIG-49 at location "85,20,0.1" is moving to...