[perl] Forum Topics

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 written a script whose output is getting mailed to me using crontab what i want it to do is mail it to someone else. this is what iam doing. 37 01 24 1 * /usr/local/bin/perl /tpf106/data2/cis_web/cis3/cis3.11/work/rishi/s-branch/perl1/perl/compare.pl | mail -s "file compare output " [email][email protected][/email](not real) but [email][email protected][/email] …

Is there an "simple" way to have a Rich-text <textarea> form save to a specific file on my server, replacing or adding to the existing version of that file? The reason I ask is a person I'm designing for doesn't knwo a lick of HTML, nor has any wish to, …

Is there a way to import the contents of a text file into a source code file upon compilation? Just like the include()/require() methods in Perl and PHP (see: [url]http://php.net/manual/en/function.include.php[/url]).

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 = '[email protected]'; 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/) { …

Here is my javascript code: [CODE]var xmlhttp; var result; function load() { xmlhttp=null; if (window.XMLHttpRequest) {// code for IE7+, Firefox, Chrome, Opera, Safari xmlhttp=new XMLHttpRequest(); } else {// code for IE6, IE5 xmlhttp=new ActiveXObject("Microsoft.XMLHTTP"); } xmlhttp.onreadystatechange=state_Change; xmlhttp.open("GET",getLauncherPath,true); xmlhttp.send(null); } function state_Change() { if (xmlhttp.readyState==3){ if (xmlhttp.status==200){ result = "readyState = …

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 Guys, I am new to Ajax, I am trying to output results by using perl script calling from Ajax, [code] function launcher(){ new Ajax.Request(getLauncherPath, { method:'post', parameters: { tag: "yadayada", uid: "12345", pwd: "blah", action : "blah" }, onInteractive: function(transport){ var response = transport.responseText; $('launcher').update(response); }, onFailure: function(){ alert('Something …

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 …

I have recently made a program that gets the links from a webpage, then checks to see if they are valid or not. I used the HtmlElement to get the "HREF" attribute and stored all the links into a list. I also tried using the HttpWebRequest and stored the stream …

I know the heading is a bit confusing.. what made me to put this question here is that :Recently i heard an article that [URL="http://lwn.net/Articles/69835/"]the rumours are true! GTK is LGPL, QT is GPL big difference[/URL] It means even if I create something with front end QT , I can't …

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 …

Hello!! I have to design a program which can read the following file: [CODE]k1082 SciTegic08250908273D 30 32 0 0 0 0 999 V2000 0.3230 -0.6380 -0.7700 C 0 0 1.1810 -1.2460 -1.7340 C 0 0 2.5950 -1.1640 -1.6010 C 0 0 3.1670 -0.4730 -0.5020 C 0 0 2.2620 0.0980 0.4020 …

Hello, I am new to perl and I would like to parse a csv file in perl. The current code I have opens a file and prints new output to the terminal. I'm wondering how to write to print this information into the file instead of to the terminal. I …

PERL Tutor Marked Assignemt 10 Section 2 - Part B You are to write a Perl program that analyses text files to obtain statistics on their content. The program should operate as follows: 1) When run, the program should check if an argument has been provided. If not, the program …

Hi, I am trying to get a perl script that a contractor created for me but I am having some issues with it. I am NOT a perl programmer and I know just enough about it to be dangerous. I am more of a PHP/CSS guy. Anyway, the purpose of …

Am embarrassed to ask this but RegEx is really my kryptonite. I have a RegEx line that extracts just numbers from a string. However, I need to tell it that I only want the numbers that come BEFORE a specific set of characters, let's say SDCSDC. Any numbers after that …

Hi, I have a site which i added mod write to the url. Some of the pages are not opening correctly. For example, the WHIWH login, should open a user & pass field in the page. You can see it is not opening it. [url]http://www.whiwh.com/login/[/url] Also a page like this …

Here is my code: package Apache2::AuthGetUser; #authenticates users based on bool value from a asmx webservice use SOAP::Lite; use Data::Dumper; use strict; use warnings; use Apache2::Access(); use Apache2::RequestRec(); use Apache2::Const ':common'; use Apache2::Log; sub handler { my $r = shift; my ($status, $password) = $r->get_basic_auth_pw; return $status unless $status == …

Hi, I want to get the ip address of the clients who is accessing my web pages. I have the following information. [code] IP Address. . . . . . . . . . . . : 192.168.3.219 Subnet Mask . . . . . . . . . . …

I'm attempting to write a script that logs into a web site, navigates through some links, stores some data to a text file, and logs out. I was able to log on with ease, using WWW::Mechanize. However I'm having trouble navigating through the actual website, because instead of just a …

Hello again. I was trying to login to my web server protected with basic auth, and after i understood that it would be nice to automatically detect the realm so now i want to know on how to do so. Thanks in advance.

hi how can i translate these amino acids sequence into its triplet codes. this line is not working. [CODE]$aa =~ tr/arndceqghilkmfpstwyv/ala, arg, asn, asp, cys, glu, gln, gly, his, ile, leu, lys, met, phe, pro, ser, the, trp, tyr, val/;[/CODE] is there any delimiter to separate that three letter codes.

i am editing someone else's code that creates a tracking log for a website. It is written in perl but the file is report.mas and there is another file that has to be altered too report.mas.obj for the file to work.. I am very confused what type of code this …

i am editing someone else's code that creates a tracking log for a website. It is written in perl but the file is report.mas and there is another file that has to be altered too report.mas.obj for the file to work.. I am very confused what type of code this …

Hi, I have following line in my Perl code--> system("start my.exe myfile.ext") == 0 or die "error ($?) : $!"; Q1: How do I close my.exe? Q2: If I give myfile.ex1 instead of myfile.ext, myfile fails to open. However, the error code returned by Perl is still 0. Normally (when …

I am creating a small test application in which i am trying to fetch the all the hyperlink's details(Anchor Text and url) on the web page. What i have done till now is that i create webbrowser component loaded the page and fetch all <a> tags. I also know that …

Hi I have problem to get data from tag (eg: <TEXT></TEXT>). For example the string is like this: [CODE]$string = "<TEXT> Some text </TEXT>"; if($string =~ /<(TEXT)>\s*(.*)\s*<\/\1>/g) { $result = $2; print $result, "\n"; }[/CODE] It works fine, but if the string is like this: [CODE]$string = "<TEXT> Some text …

Hi, i need a help to do program.i need to read multiple files and need to print out result in to new file.I had stored my datas in mycomputer/programs(G:)/CNV/(inside this i have 4 folder and each folder consits of number of datas...) plz give me perl script to do this

Hello , I have an issue of running a perl script in shell. Basically, im very new to programming. So, i dont understand how to pass an argument. The program basically reads a file which has to be invoked in Shell. [CODE] perl pgm.pl reg1.pdb[/CODE] So, in the above line, …

Hello all. I have a small problem, the next code finds the neden content, but it doenst print it: [CODE]$string = "#324423asdd asd 'BecamePosters' "; if($string =~ m/'[a-zA-Z]{1,40}'/) { print "ok!\n"; print $1; } else { print "not ok!\n"; }[/CODE] It only prints "ok!\n" but nothing more. Also triyed m/'*'/ …

So I decided to learn Perl yesterday, and I'm writing a Perl script to try and parse HTML files (not using regexps for the actual parsing). Anyway; I have this subroutine to iterate over each argument in @ARGV and, if one of them is an existing file, return it's filename …

Hello All, I am desperate for help. I have spent the last 2 days staring at this code and not getting anywhere (please see attached project files). The project requires a number sequence to be output as a text file. Starting number is input by user (number is in sequence …

Hello, I am trying to send e-mail using Perl and Net::SMTP::SSL. However, I receive errors when running this script (example from documentation): [code=perl] #!/usr/bin/perl -w use Net::SMTP::SSL; sub send_mail { my $to = $_[0]; my $subject = $_[1]; my $body = $_[2]; my $from = '[email protected]'; my $password = 'MySuperSecretPassword'; …

Hello, I am trying to compare a MySQL date to a user entered date in Perl. Basically, [code] while ( my @data = $sth->fetchrow_array() ) { print($data->{'day'}); if($data->{'day'} eq $userdate) { $conflict = 1; break; } } [/code] Being Perl code, I wasn't sure if posting in databases was inappropriate. …

Hi all, I am new to perl I want to compare two files File 1 is having protein names like Biotin-[acetyl-CoA-carboxylase] ligase Acetyl-/propionyl-coenzyme A carboxylase alpha chain Acetyl-CoA carboxylase, carboxyl transferase, beta subunit biotin carboxylase-like protein CYCLOPROPANE-FATTY-ACYL-PHOSPHOLIPID SYNTHASE 1 CYCLOPROPANE-FATTY-ACYL-PHOSPHOLIPID SYNTHASE 2 mycolic acid synthase long-chain-fatty-acid-CoA ligase 3-oxoacyl-[acyl-carrier-protein] synthase I …

Hello, I'm a newbie here and also to Perl... Have a big task of finding the lines of the form from a file ATOM 1 N LYS A 257 -5.036 -29.330 -27.709 1.0041.51 N ATOM 2 CA LYS A 257 -3.873 -29.331 -26.757 1.00 41.55 C . . . ....n …

Hi, I am using MySQL Version 5.0.45. I am getting time out error while trying to access large data. I am performing 2 operations: a) I am loading the data file into the database b) I am retrieving the data from the database. 1) Loading the data file into the …

I have created a form as part of a website... [url]http://www.deliciouscafe.co.uk/online_buffet.html[/url] I used a .pl file as supplied by my host, Demon, but when I click on the submit button I keep getting this error message "The requested URL /cgi-bin/form-mail.pl was not found on this server." I have no idea …

I have just transferred a site over to a new server. The perl scripts were working just fine on the old server and now it seems to be having issues and outputting the header content to the screen. When I fill out a login form that gets send to the …