Perl Forum

Hello all, Is it possible to disable user interaction from keybord? Thanks

I am using perl v5.6.1 which I have compiled on a Solaris 8/sparc server using gcc v3.2.2. Building and installing perl was fairly straight forward, save for some noise related to having to modify makedepend.SH to remove some dummy prototype templates. The build of perl works really well, save for one oddity: all of the .packlists that...

Hi, I am new to programming an am running into a simple problem and can definitely use some advice or suggestions. Following is the output the program below generates: quick brown fox quick brown fox jumped quick brown fox jumped over brown fox jumped over lazy fox jumped over lazy dog

Because Active State haven't yet built the additional modules I will require I'm trying to build Perl 5.8.0 from source using dmake and the Borland C++ command line compiler from the cmd.exe command shell on a MS Windows 2000 (Service Pack 2) machine. The build stage appears to go correctly but dmake test generates a failure with...

Hi Im writing a java applet that calls a perl script to save pictures generated by the applet locally. The applet converts the onscreen buffer into a GIF and sends in via POST in a byte stream. The problem im having is at the cgi end. The data should be saved as a .gif file, but when I do this nothing gets saved. If I save it as a text file I...

Hello, Don't want to touch off a religious war, but does anyone have any firsthand experience with perl scripts running under windows 2000 either IIS or apache? I've lately done a lot of one off development of sites using perl scripts under IIS on win2K server lately. My latest project has the potential of becoming much more legacy. FOr...

Hi All, I'd like to write myself a perl program to handle a received email on a specific account associated with my web site and put its contents into a known table in my site's database. My host tells me he can point an email account at a perl script so that the script receives any email sent to that account. I'm a reasonably...

I'm trying to scratch up a whois-like client in perl, and am having a strange problem with matching input characters. Specifically, matching against things like "@" works fine over the network, but when the application is called locally, the matching does not work. Here's a snippet: # # if resource-type was not specified, detect from...

Hello, I have a form in which the user can enter a query in a query language. The form is submitted to a perl script that checks if the syntax is OK and if yes, execute the query and generates a html result page. If the syntax is not OK, I want the client to display an error message, in a small pop up window on top of the page from which...

I am writing a program for a study I am doing where I must contact several different organisations stored in a database I compiled, but I need to send each email one at a time so they don't know who else I sent to. I tested my sendmail and it works well, but I am having a problem with chomp in the case I am using it. When getting $email, if...

Here's a question for people in the know. On PHP there is a global option to turn on Zlib compression to save bandwidth. On perl is there anything similar? I currently run Ikonboard via Active Perl (for win32) and was wondering how hard it would be to enable Zlib for this application or global for perl?

Hi, I'm used to Unix, and shell scripting for doing a variety of admin tasks. Recently, my company started using Windows as well, and I'm looking into the possibility of rewriting some of our scripts (Korn shell) for Windows, since we will need much the same functionality. I'd like to try it in Perl, for possible portability back to...

I trying to use this module to disable user's interaction from keybord. sub test1 { .... dialog --yesno..... "Dialogbox 1" use Term::ReadKey; ReadMode 4; # Turn off controls keys

I have the following perl script but when I use the $ARGV variabe and try to run in the unix it gives me error. The name of the file is FTP_FILE if($ftp_status==0) { print "\nPut file $FILENAME"; # Quit the FTP session $ftp->quit() or warn "\nCouldn't quit";

Good day, perhaps someone is interested in enhancing this regular expression (^((\w+)(\-)?|(\.)?)+((\w+)((\s)+|((\.)(\s)*)))(\d+)) it is meant to filter a string, corresponding to a valid german street + housenumber entry like Hans-Ebert-Weg Nr. 120

Can someone tell me how I can validate XML file like the one below I have an XML file like.... <DateCreated> <Year>2000</Year> <Month>09</Month> <Day>25</Day> </DateCreated> <DateCreated>

I have a large array of numbers, say 10,000 rows by 8 columns. The numbers are mostly floating point but some integers. I want to align each column by the decimal point or right justify the integers. Is there an easy (read obvious) way to do this? My current code reads everything in as a string and does a split to put each number in an...

I am using Perl to parse a text file and output to another file. The text file has data on Unix virtual memory (vmstat) and I want to delete lines that I don't want and output lines that I want to a new file. The script I have is giving me blank lines in the new file. #!/usr/local/bin/perl #program to read systemdata file #and write to...

Hello. Thought I had this one cracked. Wondering if anyone can help me. I've got a object method that cleans up image links within content by inserting a full url to an image directory, if it does not have one already. For example: image.gif is replaced with http://myserver/fullpath/image.gif http://someserver/image.gif is left...

Hello everyone! I wrote a simple perl program to encrypt a string using Crypt::OpenSSL::RSA. Everything as described in the module documentation. The public key is a valid X.509 encrypted certificate. When I tried executing the code I get the following error: -------------------

Good afternoon everyone. I'm trying to help a friend out with a client of his and I'm running into an issue with Perl's s/// operator. We've got about 100 pages of a simple shopping site. Each page has about 50-100 items on it. Originally the customer wanted prices posted online, but now he's decided he wants to have his customers call him...

I tried to compile the GD module on REDHAT 9 and it fails to compile. It fails during the make process. I am hoping that there is already a compiled version that I can use for REDHAT 9 Thanks in advance Jim Rendant

These are informix/4GL lines. I am writing equivalent perl code Can anyone explain me what this code performs sdate be any date ------------------ let mnth = month(sdate) let yr = year(sdate) # let edatec = mnth using "&&", "/01/", yr using "&&&&"

Hello, Recently we made some fairly significant upgrades...going from Solaris 5.6 to Solaris 5.8 (Solaris 8). Along with this, we decided to upgrade from perl 5.005_03 directly to perl 5.6.0. Although this was a fairly significant jump (especially in perl versions), our applications are such that the testing was fairly straight-forward...

Hello everybody :) Does anyone know where to get a Net-RawIP port for windows? If not, is there a similar module I can use to format IP packets? Thanks in advance- -Selwyn