Perl Forum

Hi all, i am trying to run the following code use strict; use Win32::OLE qw(in with); use Win32::OLE::Const 'Microsoft Excel';

Hi, I get the following error with Expat while configuring my application server. Can anyone suggest a solution? When i do an ldd, i get the following : $ldd Expat.so Expat.so needs: /usr/lib/libc.a(shr.o) Cannot find /unix --- Is there a problem here? /usr/lib/libcrypt.a(shr.o)

Hi I am trying to setup a form that automatically sends the form values via email to a specific address. I have uploaded the script, which when I run loads a page with the following error message: CGI Error The specified CGI application misbehaved by not returning a complete set of HTTP headers. According to the tutorial I am using the...

Hi Is there any way I can create PDF files from Postscript files uing perl ? I was using ghostscrtip till now, but it has some license problem using for business purpose. So is there any perl modules which can be used for converting PS to PDF ? I looked into PDF:API2 and PDF::Create. But I couldnt find a way to use it with a postscript file. ...

Hi All, I need help urgently on erl Expect package.I am working on AIX for automating a command line interactive application in Japanese language.Is there any package for multibyte languages? Will expect work with multibyte languages? Please let me know as earliest as possible. Thanks,

Hello all, I have created a GUI box using Win32::GUI::Window and all i want to do is add a question mark icon in the window on the left, but i'm having trouble figuring that out. i know that using Win32::GUI::MessageBox has options that you can use such as MB_ICONQUESTION, MB_ICONEXCLAMATION, etc, but i don't see anything for Win32::GUI::Window....

Hello All, I am trying to extract text from the HTML using the following code, use strict; use HTML::Parser 3.00 (); my %inside; my $p;

Hi I am using Perl 5.8.8 and i use DBI->connect("dbi:ODBC:driver=Microsoft Access Driver (*.mdb );dbq=$file" to connect to access. This used to work with access 2000. but now in access 2007 the file extension has been changed to .accdb so i changed the code to DBI->connect("dbi:ODBC:driver=Microsoft Access Driver (*.mdb, *.accdb);dbq=$file"...

I have written an automation using Perl (Win32). in a nutshell, it's layered on top of another software and the perl script manipulates the other software's windows and menus by moving around the mouse and automating keyboard strokes, etc. What if i wanted to capture this automation and put it into an mpeg file. is this possible?

So I have this script and it works great at sending things over a socket after tailing a file. The problem seems to be when the recieving end is not available the program crashes. Is there a way to get the program to stay up and wait for the recieving end to be available? use File::Tail; use IO::Socket; { local $/ = "\n"; my $name =...

HI every body, i am always getting the following error while parsing a directory . i am reading a directory by doing ls and trying to find out the name,type,size, mtime and mode of files from the directory my @valeu =@{$Files}; foreach my $file (parse_dir(\@valeu)) { @Files = $ftp->ls('-lR');

Hi.. I have one directory which contains huge amount of .php files. I want to delete <p align="right"><input name="closeme" type="button" value="Close Window" onclick="self.close()" /></p> <br /> ---- Close window code form each of the pages. So i need some perl subroutine which can do that for all the files in the directory..

I'm reading line by line and making comparisons. I have been using the index function but I knew what my substring was. Now I don't know what my substring is. I have an index function searching for ' /* ' and as soon as I see this comment, I want to know if there is anything before it on the line. For example: print "hello"; /* prints...

Hi all, I have a data similar to one listed below,(It is stored in a array with comma as delimiter). For each month and each Department I need to get the status count. I thought of using Hashes but not sure how to get it. Sampe Input: ID Status Depar DATE D123 Good A 12-03-2008 D123 Bad B 13-04-2008...

Hi All, I have the following code, $min=12345678901234567890; $max=12345678901234567899; print "max=$max, min=$min \n"; if ($min < $max) { print "Output : ok \n"; }

hi all, i've trouble installing module net::Telnet i used to be able to install all my modules on windows XP using ppm but all of a suddent i get the error: "407 proxy authentication required"

hello, i'd like to know how can i use vslick debugger to debug perl executables ...

Hi all, My short program below is to read directories names form command line. It should only start with alphanumeric characters and contain no other characters except spaces, underscores and dashes. So far what i have done below is only accepting alphanumeric characters and underscores. My question is, how do i add another character...

Hi All, I have data in 20 different folders named from step_1...step_20 and each folder has some files which I am trying to manupulate and after that my program should make directories named step_1_results .... step_20_results and write each results into the respective directory. But somehow my code is not making directories and writing files...

Hello all! Newbie here, I've been tasked with a fairly intensive project here and my perl skills are still at a minimum so this post may eventually turn into a long one, but I am only going to ask the immediate problems I am having first and try to figure the rest out myself. Basically I need to compare the contents of a directory, with the...

Hi all, Hope someone can help, i get the date in the format of 12/12/2008 i 'd like to find out what day this is on, either a weekday/weekend. so output would be: 12/12/2008 midweek: fri 12 december I'm also trying to do it the hard way, without the use of any modules .. i feel this will help my perl skills.

Hi,everyone: I have a problem now. I can't get the information between the <tr><td> and </td></tr>. for example: I use this regular expression can't get it, I don't know why. $test=~/<tr><td>(.*)<\/td><\/td>(.*)<\/td><\/tr>/ms; <tr><td>station</td> <td>station number/identification, see chart above: <br> B = GoMoos buoy B location<br> S...

I have many files in a dirctory in which I need to make the common subsitution. I need to delete all lines between two matched patterns I need to match a line having words " chkstats to capture " starting from this line (Say it occurs at line 40) to another line "Failure to pull stats" (which may come in line no 100) and there is...

Hi, I have strange problem with my perl program. My program consists of two parts, first written in python and second in perl. Perl part is a server, but also uses two sockets for "talking" with gui written in python. Problem is, that from totally unknown reason perl program quits at line, where i'm trying to 'print' anything for AWAY gui socket....

Let's say you have the following data structure. $VAR1 = { 'xxx' => { 'xxx' => { 'xxx' => } } }; Say you want to access the array portion, is there a more elegant way of accessing the array data?