Perl Forum

Actually I have a CGI form which consists of textfields and I need a combobox in which I can enter my own data dynamically. May be it seems very silly question but I am new to cgi-perl as well as HTML so no idea what to do. Here is my form: #!C:\perl\bin\perl.exe use CGI; use CGI qw/:standard/;

Hi, I am new to perl and was trying to write a perl program witha UI. i.e. I have written a html form which invokes a perl program to execute and to print back the data selected in the form. When i enter details into the html form and click on the submittal button, it throws an error saying "Internal Server Error The server encountered...

In my script, I would like to simulate the fact that someone presses on the "x" key on the keyboard and then presses Return. I got some info from web, but still confused #!/usr/bin/perl -w require 'sys/ioctl.ph'; die "no TIOCSTI" unless defined &TIOCSTI; sub jam { local $SIG{TTOU} = "IGNORE"; # "Stopped for tty output" local *TTY; #...

I have a CGI page with a table which is populated by fetching the data from database, in a word its like a DATAGRID. And just at the bottom right end of tha Grid I need a link like "First << 1 2 >> Last" or like" |< < > >| "on clicking which I can navigate to and fro the records. And I am intend to have "10" records per page. While surfing...

I've seen this question posted previously on bytes.com, but the question was never fully answered. Hypothetically, use this as a URL: http://subdomain1.subdomain2.domain.subdomain3.com What I'm looking for is a way to extract just the domain name leaving the subdomains and any other data excluded. At any given point, I won't know how many...

Hello, Could someone please help me define and imported a subroutine. I will try to make this simple. Script-A contains all of the processes for script-B. Script-A uses script-B as a 'use base'. Script-A (containing the processes) has subroutine-1 which is used by subroutine-2 How do I import/define script-A subroutine-2 to...

I have an array @myarray = ("father","mother","sister","brother"); How to find the position of "sister" in @myarray I didn't get any built in functions to do this. I'm a newbie in Perl. Please suggest some good tutorial.

Hi Everybody, I am new to perl so am asking you all a very basic question. Do we get to have a compiled file in perl just like java? What I mean is whether we get to have a compiled file for our .PL files like we get to have .CLASS compiled files in JAVA. If yes, I'd appreciate if somebody could guide me about how to get it. I...

How to compare two files in perl. I have two files as shown below. First XML File <Data> <indep voltage> +1.20000000000e+01 </indep> <indep current> +5.08474576271e-04

Hi, Anyone please help me in solving this issue? How to attach a file using mail command in Linux? I tried with uuencode " " " " | mailx command, but i am getting an error "uuencode command not found". Thanks to everyone.

Hi, When I run my program on a linux machine it opens, renames, and unlinks the files as expected. However, when I run it on Windows it will not rename or unlink the files. Since it is opening and reading the files correctly, it seems that the problem is not in the difference between the path name styles. Here are the relevant parts of...

Can anyone tell me which ppm repository has Win32::GuiTest package in it, i tried adding "http://ppm4.activestate.com/MSWin32-x86/5.8/822/package.xml" and " http://ppm4.activestate.com/MSWin32-x86/5.8/825", but could not find Win32::GuiTest package in it, pls help me ...

hi, i wanted to know how to comment multiple lines in a perl program say in this piece of code. for ($i=0; $i<5; $i++) { print "<tr> <td width=10%>

I need to call a batch file for execution through the perl script.pz help

I am a Unix based perl programmer but I need to be able to run perl scripts in Windows XP. I cannot get perl to execute other than at shell windows level. I would like to execute a perl script from a .vbs script in XP

I have issue regarding paging using filter expression. Here's the piece of code for filtering: if ( $q->param("Filter") ) { $Id=$q->param('User_Id'); $Name=$q->param('User_Name'); if ($Id ne "" ) { $filterexpression= $filterexpression." UserId like '"...

i'm reading Network Programming with Perl there is an example in chapter5:concurrent clients. #!/usr/bin/perl use strict; use IO::Socket qw(:DEFAULT :crlf); my $host=shift or die"Usage:gabl.pl host \n"; my $port=shift || 'tcp';

Hello, I have a large number of xml files in a folder. I want to read and extract the content of each xml file to a new.txt. I'm only interested in the content having the tag <Texte>, and i want to create a .txt file (a texte file for each of my xml's). I use the perl modules xml twig and xml simple. There's the code i have until now: my...

Hi, Anybody help for me the below mentioned error occure for my first cgi program. file name: first.cgi error message. Server error! The server encountered an internal error and was unable to complete your request. Error message: couldn't create child process: 720003: first.cgi

Hi all, I've made the script below to calculate the coverage per position of small pieces of strings. It works fine but when I tried to speed thing up for large files using forkmanager the script takes an awful lot of time when I set 2 parallel forks. Setting it to 0 works fine. Does anybody have an idea what is going wrong? Kind Regards...

$string1 =~ /($modul\s#\(.*\);)/gs; $instancesfrom1 =~ /$modul #\((*)\);/g; m/^(\Q$lkup(\E.+?\))/ Hi any one can you please explain me the above regular expressions i want a regular expression matching the requirement

I have to create a perl script, which is calling a .sql script. This .sql script is creating alphabetic listing of .inc files from A-Z. All the .inc files will be having a suffix with lowercase of the alphabet name with it e.g. testa.inc, testb.inc etc. I then need to move these .inc files to another directory. I dont know much perl , so any...

Hi, some simple code required.i was trying but i was unable. But i want instances to get printed each time like we are printing comparing instance name. suppose if we take Each X_RAMB18E1 module consists of different instances like i for the first time ...

I wrote a script to list all lines in a file with Perl. I am having trouble with the looping part of it. My script is supposed to look at the file and as long as the file is larger than the current line it prints a new line. I am getting an error that won't stop on the while line of my code I believe. Here is the code: #!/usr/bin/perl -w...

Hi, I am new to Perl trying to setup an environment for learning Perl. Here is what I have done. 1. I have installed Perl 5.12.2 Build 1202 2. I have installed Abyss Web server X1(free version) 3. Followed the instruction to associate Perl with the webserver from this link: http://www.aprelium.com/abyssws/perl.html 4. I am trying to...