[perl] Forum Topics

The page: [url]http://tldp.org/HOWTO/Bash-Prompt-HOWTO/setps.html[/url] shows the best place to change the shell prompt (which is .bashrc). However, the previous page of that document has a lot of escape sequences offered by the Bash shell for insertion in the prompt (From the Bash 2.04 man page) I found that \w (the current …

Hi, I am new to using the Soap::Lite perl module. Here is a piece of code to retrieve an image, but it does not seem to working properly. [code] #!/usr/local/bin/perl # Load the SOAP library use SOAP::Lite; # Service details my $NAMESPACE = 'http://ops.epo.org//soap-services/document-retrieval'; my $ENDPOINT = 'http://ops.epo.org//soap-services/document-retrieval'; # Create …

Hi, new to Perl. Learning regular expressions. Im trying to validate a form field using regular expressions. Field criteria is: - Begin with a letter - 4-8 characters long - must include at least 1 digit So far Ive got: [code] $fieldValid=$username=~/^\D\w{3,7}\d+/; [/code] I read this as "beginning with any …

Hi all, I need a perl script that can open files (given in command line arguments) and extract/print out any dates or times found in it. The format of the dates and times can be any reasonable format. The problem I have is I don't know how to print out …

1. What is the difference between the system and exec family of functions? 2. I want to collect the output of the call from the system functions say. Say I execute this system("date"); Now say I don't want it to display the output rather it give the output as an …

hi, I have written the perogram in perl and i want take previous date in "April 3 2010" in this formate . plz tell me how can i get this. [code=perl]#!use/bin/perl use Date::Format; my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(); my @weekday = qw(Sunday Monday Tuesday Wednesday Thursday Friday Saturday); my @month = …

Howdy all, For some reason I just can't get my modules imported into my CGI script and run in a browser. It will print the HTML fine in a command prompt call, but the browser gives an "Internal Error 500." Error in Firefox & IE: Server error! The server encountered …

So; I have a list in a text file that contains sections of a what would be filenames.. I'm wanting to read from this text file into I guess an array, unless there's a better way to do it.. and then find the file that matches with each of the …

Hi there, Could someone tell me if it's safe to edit PCL(Printer Command Language) files in Windows? I've a bunch of PCL files to edit and each PCL file is different when it comes to the header part. So, I'm not able to figure out a standard simple way to …

Hey Guys, I am developing one tool on perl to moniter mysql database in many systems(in all types of OS). I want to track some info like this getting databases parameters , getting database schemas, get logspace .... etc , what could be the good approach in perl.. If you …

hi, I have date in this format December 2 2009 December 2 2009 December 2 2009 and i want to insert it in my table in mysql .I m inserting this with the help of perl means i m doing my program in perl .ook at my program [code=perl]#!/usr/bin/perl use …

Is there a method in Linux to monitor a port for activity, then when found, execute a script? For example, when tftp port 69 is accessed, run a script that runs commands. thank you.

I was wondering if it were possible to extract the hashes from the XML:: Simple output without knowing the elements' name beforehand? I've searched the web and only found tutorials how to get elements from a certain file with certain tags. [CODE]use XML::Simple; use XML::Parser; use Data::Dumper; my $file1 = …

Hello again, Whenever I run a certain .exe in my CGI script, it opens the process but does not bring up the application. I am forced to close it out through task manager. Both exec & system have the same result. I created an autoit script to run the .exe …

So; new to this perl mess But I'm wanting to write a little snippet that performs what seems to be a simple action. I have three text files Text1 contains a list of items that are required Text2 contains a list of items (some may be on the list of …

\\computer name .not accessible.might have no permission. is the error mess I am getting while trying to access my lan please any one send me the trouble shoot method to it. pls pls Thanks in advance

Hey there :) i am trying this part of code, which testing arguments on command line: [CODE] use Getopt::Long; GetOptions( "verbose" => \$verbose, "get" => \$get ); print "verbose = $verbose\n"; print "get = $get\n"; [/CODE] In my script i have several arguments, with which my script working (any sequence). …

I'm currently learning how to read through large groups of text files to scan for key words for some research work I'm doing. I came across an example that I don't fully understand, mostly because my Perl knowledge is a little piecemeal and it's been tough trying to find a …

I have a need to strip "some" of the comments from a C file. The comments can be C or C++ style and can ofcourse be part, single or multi line comments. As in [code=c]/* usual C style comment */ int i; /* this is going to count things */ …

i have an old CGI script i have been using for years for my guestbook... i don't want to update it, it works fine, its lite, easy.. ok.. but, lately i have been getting nailed by bots posting... i need to install some sort of captcha.. and that is where …

hello, i'm having trouble printing arrays to file. each time i run this code, i get only two results max. if the array has 2 genres, i get them but no languages. if the array has 1 genre i get it and only 1 language. if the array has more …

Hi all, it is nice to join such a large and friendly IT community! I hope i can contribute to its collective knowledge. So, a bit about myself. Name: call me Kati Age: 24 Current Location: Tuebingen, Germany Education: Computational Linguistics, MA Programming languages: java, perl, python, php... some more …

I need a perl script for the following case. Input is a text file with the following content AB001. I need to replace the text with AB002 in a new file. This has to go on until AB999. ie., At the end there should be 999 files with the contents …

Hi, We've a requirement wherein we're provided with a csv file, within the file there is a name field, and some of names are very long and are causing issues while importing. What we want is pull out these kind of rows containing longer names and send it back to …

hello, i use a simple log script on my site.. very basic.. i would like to modify it, and am having issues.. here is what i would like... i would like to be able to have it filter out certian HOST names.. but not exact.. say for instance, i dont …

Hi, I have a Word doc and a front page doc. I am looking to create a script that will look through the 1st document and take any text between two tags (ex: <h1>text text</h1> and then copy it to another file between two tags (say <tr>%text will go here%</tr>. …

Hello, Question regarding the connect function (in Socket), how to specify a specific port? The function only accepts two arguments, the socket and the ip. I have multiple devices on the same ip but different ports that I need to connect to, how to do this in Perl? Thanks.

Hi, I have few weblogs, example below 65.96.112.177 - - [27/Jan/2007:00:02:10 -0500] "GET /~jking/images/ralph.jpg HTTP/1.1" 200 66196 65.214.44.44 - - [27/Jan/2007:00:02:27 -0500] "GET /~jkabara/Research.htm HTTP/1.0" 200 4696 207.46.98.52 - - [27/Jan/2007:00:02:29 -0500] "GET /~mweiss/new/background.htm HTTP/1.0" 200 3905 207.46.98.52 - - [27/Jan/2007:00:02:35 -0500] "GET /%7Epaws/project_pacer.htm HTTP/1.0" 200 15645 207.46.98.52 - - …

Hi there I am translating PERL code into python and i am new on both language.I have one question if we have hash key reference in PERL like this way $a->{b} how we can traslate it into PYTHON? and if we have this code $a->{$b} , how we translate it …

Gentlemen and Ladies - Help!!! We have converted a legacy COBOL system that has about 500,000 lines of code to the web using MicroFocus tools and Perl. We are using ActiveState Perl 5.8.9 on Windows Server 2003 .Perl is the "glue" for the system. The front ends sole purpose is …

The following code fragment from Programming Pearls: [CODE]for i = [0, n) if comlen(a[i], a[i+1]) > maxlen maxlen = comlen(a[i], a[i+1]) maxi = i[/CODE] I am not sure why he called the comlen function twice? Instead he could save the computed value in a temporary and use it to assign …

Hi, I am using ppm shell to install a perl module in windows. I have set http_proxy=http://localhost:8080. I don't have proxy server i am using TATA Indicom Connection. When i tried connecting and downloading perl module i got error like this: [code] ppm> install Mail::Sendmail Downloading Mail-Sendmail-0.79...failed 500 Can't connect …

Hey Guys. I cant actually think of a way to do this. Let me rephrase my question. I essentially want a perl script to run based on something that i am doing in javascript. for example: <javascript> if(x == 1) { then run the perl script. } </javascript> i dont …

Hi All, Have a module that already opens and reads my POP3 email. I was hoping there might me a ONE stop module that will take any email and translate it all into just SIMPLE TEXT? any ideas? Thanks ahead, as always Sergio

Hi, i've problem with reading arguments on command line. I don't know, how do I distinguish, if the user entered some argument with one or two dashes. I try: [code] while($ARGV[$i]) { if($ARGV[$i] == '--anything') { print "The argument with '--'.\n"; } else { print "The argumentwith '-'.\n"; } $i++; …

Why doesn’t the following code print the newline properly?

hi i m new to learning perl please anyone tell me how do i start learn it? Which libraries are used in perl...? From where to i can get all these information? Give me brief introduction about perl.......

IO::Tty is a pre-req for expect.pm IO::Tty install reports that "Configuration looks good!" (See below) but the makefile fails with missing Tty.so Any suggestions? ------------------ # perl Makefile.PL Now let's see what we can find out about your system (logfiles of failing tests are available in the conf/ dir)... Looking …

Hi all... I am trying to embed Java into Perl. I am a newbie in Perl and I am facing a lot of problems. I used Inline::Java to embed Java into Perl. The details of the modules are as follows: Pojo.pm contains the Perl module with Java embedded in it. …

Hi, I am new to perl,i designed one web form using html for this form i need to attach captchaimages for security,How can i generate captcha images using perl scripts. Please help me in this issue.

Hi , I am new to perl language,while i am working with this i got a small problem. I designed a form in html it contains four fields. when the user clicks submit button in this form i redirecte my page to serverside code which is perl. In this i …

Hi, I am new to perl scripting language, While i am working with this i got a problem in this.When ever i am trying to redirect to a next page uisng perl script i got the problem it did not redirect to the next page. here i am explaning with …

Hi Friends I have a requirement to where my cgi program has to send an email when the "Submit" button is pressed. Here is my cgi program, which has a text field to enter the username and a submit button. [code] #!C:/Perl/bin/Perl.exe use strict; use CGI qw(:standard); use CGI; use …

Hi there!! Just wanted to know how to match the line containing $$$$ from a file. Is this correct : (my $row =~ /\$\$\$\$/) Thanks in advance!!!

Hi, I need help to make a perl program work. The program accepts an input (reaction) and then search for the input in a file and then displays the reaction on the same line. Input file - file.txt (A large file with no header and in the following format): A1_HTTT24 …

Hi again. I have a gridview control on my page, and some search criteria textboxes, etc. When my user clicks 'Search', I want to show or hide an unrelated hyperlink based on the count returned by the grid. I'm having trouble figuring out when to do this. I started with …

We are an American company, doing business world wide, we have a lot of members coming on board in Russia, Estonia, Latvia, Africa and lots of other places. They are all asking for us to translate the web pages. So I programmed in a language translator, where we can give …

Hi, I've this script that takes care of picking phone number in standard format - xxx-xxxx, further i would like it to pick phonenumber even without hypen - xxxxxxx. How can i do that? [CODE] foreach $number (@numbers) { if ($number =~ m/(^\d{3}-\d{4}$)/) { push @results, $number; } } [/CODE] …

Hi, I am very new to perl pgming. I have a weblog which has a standard format as the below example IP | remoteUser | authUser | Date/Time | Request | Status | Bytes For example, 74.6.72.229 - - [27/Jan/2007:00:00:36 -0500] "GET /~jking/ralph.html HTTP/1.0" 404 215 the fields are seperated …

Hi, I'm new to this forum. I have a question regarding outputting to .txt file. [CODE]while($file =<DNAFILE>) { open FILE, ">newseq.txt"; my $dna = fasta($file); my $newseq = mutationdna($dna,$years); print FILE $newseq; #this does not work. how do I fix it? print $newseq; # this work }[/CODE] The outputting to …