[perl] Forum Topics

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++; …

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, 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 …

Hey guys, I'm a newbie here and also to Perl.I have a similar but difficult question than a previous question here. [url]http://www.daniweb.com/forums/thread245502.html#[/url] I have a output file containing atoms like this: #F A 1 1 1 3 3 2 #C number type mass x y z vx vy vz Epot …

hello i used this while(my $file=glob("$dir/*")){ but as the directory has whitespace in path-name it cause error ,how i can solve this? thnx.

Hi, I have an input like this: gene1 pos1 description1 gene2 pos2 description2a gene2 pos2 description2b gene2 pos2 description2c gene3 pos3 description3 gene4 pos4 description4a gene4 pos4 description4b and I would like an output like this: gene1 pos1 description1 gene2 pos2 description2a, description2b, description2c gene3 pos3 description3 gene4 pos4 description4a, …

hello i m new user and i want a theme for my project named project managment system i f u can help me i m thankful to u

Hi, I have installed WWW-Mechanize-1.60 in Linux platform. Problem is that i am getting this error. [code] Error GETing http://www.example.com:Can't connect to eutils.ncbi.nlm.nih.gov:80 (connect: timeout) [/code] Here is my code. [code] use WWW::Mechanize; $url="http://www.example.com"; $mechanize = WWW::Mechanize->new(autocheck => 1); $mechanize->get($url); $page = $mechanize->content; [/code] How can i solve this error? …

Hi, We're trying to monitor our logs, and would like to be alerted in case of repeated occurrence of a certain field ( ie PY1011 ). We'd like the script to be run every half hour, which will scan the log file, look out for repeated of any user, if …

Hi Friends I have written a perl script which sends an email on Windows using NetSMTP. [code] #!C:/cygwin/bin/perl #print "Hello world"; use Net::SMTP; use strict; my $smtpserver = '10.154.118.140'; #my $smtpserver = '127.0.0.1'; my $smtpuser = 'myname'; my $fromemail = 'myname@mycompany.com'; my $smtp = Net::SMTP-> new($smtpserver, Timeout => 10); $smtp-> …

New to perl and asking for help. I need to execute the following: 1. Extract text between double quotes from text file located in subdirectory of INI directory 2. Search in directory TestData for the file with name that matches the text extracted in 1. 3. Copy the file from …

Hi everyone!! Help me please with my script. I'm using Perl Express for scripting in . This is my script: [CODE]use warnings; use strict; open (file,'C:\Documents and Settings\soea\Desktop\Test.docx') || die "Can not open: $!\n"; @file = <file>; for (my $i = 0; $i<=scalar(@file)-1; $i++;) { if ($f[@file] =~ /^Exec.+\n/) { …

hi, I am new to perl. actually, i'm using perl with SOAP::Lite to access a web server. I wrote some code in a notepad and saved it in c:/perl/eg. by typing 'perl filename.txt' after changing the directory into c/perl/eg> in command prompt, i am getting the result what i want. …

Hi, In our organization, there are lot of users who do not have their phonenumber in proper format. the correct format is : xxx-xxxx. Therefore, i've pulled out a all users report, consisting of two columns, one with name and other with phonenumber, the report is in csv format. Does …

hi, i want to send my perl output to a notepad. is it possible.. for instant, my perl result with some dna sequence should be copied to a new text file. is it possbile... can any one help me.

print"Enter the number of Cricketers: "; $list=<STDIN>; chomp $list; until($list<=0) { print"Enter Cricketer name: "; $name=<STDIN>; print"Enter a number: "; $number=<STDIN>; chomp $number; $list--; push(@names,$name); push(@numbers,$number); } print"Cricketer's name and the corresponding number are\n"; format STDOUT=@<<<< @>>>> "@numbers", "@names" . I have this code. The question is "Write a program …

hi i want to translate the single letter aminoacid code to triple letter code. how can i do that using tr///; command. can any one help me.

Hello, I am new to the perl programming language and I have a question. I was wondering if it was possible to implement an array of strings that contains video files? I also wanted to know if it was possible to create state machines using the perl programming language? Thank …