1,633 Topics
| |
Hello there, I installed [URL="http://www.activestate.com/activeperl"]ActivePerl[/URL] (I kept all default settings) and also downloaded [URL="http://search.cpan.org/~srezic/Tk-804.028/"]Tk 804.028[/URL] and extracted it to C:\Tk-804.029. I'm wondering why I keep on receiving this error whenever I run this simple script on my command prompt window (I'm using Windows XP Pro). [QUOTE]Can’t locate Tk.pm in @INC … | |
I'm trying to convert html to plain text (remove all html tags) I don't want to use regex so I tried the module HTML::Parser and tried the parse() function but i got this error [CODE]Undefined subroutine &main::start called at getwords.pl line 27. [/CODE] and as a matter of fact I … | |
Please Help me to extract the inner table to the outer table so that it will not have table within table because it is not good data.. thank you Raw Data [CODE]<item> <pre> <table width="100%" border="0" cellpadding="2" cellspacing="2" bgcolor="#eeeeee"> <tr> <td><p>"Gratitude for the abundance you have received is the best … | |
I am writing a script in perl for my project. I have given a snippet of the files below start.pl contains: system("/ws/nibalan/submain.pl"); submain.pl contains: system("/ws/nibalan/submanual.pl") open(INPUT, ">/users/$login/input"); - - some writing into input file submanual.pl contains: open(INPUT, "/users/$login/input"); open(MANUALANS, ">/users/$login/manualans.pl"); - - some writing into manualans.pl file While trying to … | |
Hi Experts, Recently i written the script for text file to CSV file conversion. my script has read the directory and it would process the each file by file based on iteration. Coding and output was fine. i need to improve to speed up the script to convert the csv … | |
Dear All, Can anybody tell me how to autoincrement the Hexa decimal value. For Ex: I am having the value FF0B in Result array and want increment it to FF0C. Now Result array should contain two values. | |
how can i get a variable inside a package example: [CODE] { package example; my $baz = "sometext"; sub new{ my $self = shift; bless \$self; } } my $foo = example->new; [/CODE] how can I get the value of $baz i tried [CODE]print $foo->{vv}; print $foo::vv[/CODE] and no luck … | |
All, I have a simple question. What is the standard procedure for retrieving form values via POST method in a web form? Perl can be extremely awkward for web programming, I'd normally use something else, but in this case I need to use Perl for the CPAN module. Anyway, back … | |
I posted a similar thread back in Nov and got some great help. I'm modifying the code to be useful to not only compare multiple columns from two separate files, but also to classify each line from @hairpin to determine if the parameters fall within any of the ESThits, outside … | |
hi..i am new to perl language..ive given a task to extract some info from a logfile and print the extracted to a new file..what make it difficult is because it need to extract vetically..for example below with some conditions; [ICODE] ------------------------------------------------------------------------ C H W S Z S W T C … | |
Hi, I have been trying to execute this program and i am getting an error. Kindly help me. #!usr/bin/perl -w # The filename of the file which contains the protein sequence $proteinfilename = '/users/sukeerthiteja/desktop/perl/NM_021964fragment.pep'; # First open the file and associate a filehandle with it. for readability purpose lets use … | |
| Hi all, am using a regex (in php), but I'm all confused. I'm trying to replace a string ('di') with 'deu'. SImple enough, but I don't want a replacement if 'di' is preceded by 'io' as in 'iodine', 'iodic', 'iodide' etc. This is what I have: [CODE]'/(?<!io)di/i'[/CODE] It works fine … |
Hi, Could any one tell me what is wrong with my code? It does not time out after 5 seconds which is what i need. It remains in the infinit loop. [CODE] #! /usr/bin/perl use strict; use warnings; sub comeOut; $SIG{ALRM} = \&comeOut; while (1) { }; eval { alarm … | |
When we click on the Hyperlink of subject a new HTML Page should be pop up and shows the body of the mail. I have written two perl codes first is for displaying the page with folders with subject another perl code having function to show the body.How can I … | |
Dear Experts, Can you please explain about Perl Signature ? Thanks, Senthil. V | |
I have added a png image to a table in the database as a BLOB. Adding the image into the database is trivial. However, being able to display the BLOB back to the .png image format is bewildering me. Examples are hard to come by... How to display the BLOB … | |
I want to remove all lines in a text file that start with HPL_ I have acheived this and can print to screen, but when I try to write to a file, I just get the last line of the amended text printed in the new file. Any help please, … | |
I have an array with 5 elements. With each fork, I want the next element to pass to it and then exit. Here's what I've got so far. Could someone please help? :) Here's what I get: child 0 k: test1 child 0 k: test2 child 0 k: test3 child … | |
All, I have been trying to debug this problem all weekend but I haven't been able to get any closer to the solution... I have just upgraded Mysql to 5.1 from 4.1 on a Red Hat 4 box. Everything is fine. I can connect to the database using the shell, … | |
Hi, I have a folder containing a further 2500 folders or so. These all contain files. I want to move the files from within only a selection of around 260 of these folders into a new folder. I have a text list of the folders of interest. So basically I … | |
i am participating in an online prog contest and only recently started learning perl. I am programming in windows environment while the contest requires programs executable in linux environment. The program takes input,a file name, as the first argument in the command line and generates output in the console itself … | |
Hello Experts, Kinda new to perl. I am using perl web API to get the data. The error is "application/xml; charset=UTF-8". I used 'use utf8' but doesn't seem to work. The line it gets stuck looks like something like this [CODE] my @candidates = $c->bookmarks_for(start => 1, tag =>'pubmed'); [/CODE] … | |
Hello All I want to learn PERL language. Till today I know C, C++, HTML and little bit JAVA. So is there any prerequisites for learning PERL? Which book you will recommend for me (that book must be available freely :) ) for quick learning PERL? | |
i NEED A PERL SCRIPT TO CREATE NAME_DIRECTORY FOR ALL TRAJECTORIES. i've trajectory files like this, rep2.tra3M.bz2 rep2.tra4M.bz2 rep2.tra5M.bz2 rep2.tra6M.bz2 rep2.tra7M.bz2 i want a scipt to list all replicas,copy zipped replicas and unzip all replicas and create a file with list of replicas and call make_pdb.pl for all trajectories. | |
hello friends, i am doing my final project in which i have chosen to operate electrical appliances through cell phone in which i am going to use Linux and Perl to connect to cell phone and so on.... i am little stuck in the Perl way,can't figure it out that … | |
Dear Experts, Here i have bit stuck with logic to create text to CSV file creation. pls help me to this code. Thanks in Advance, Senthil. V [CODE] [U]input file[/U] "OC192-11,OC192:ESS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:SESS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:SEFSS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:CVL,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" [/CODE] [CODE] [U]OUTPUT as CSV [/U] ESS SESS SEFSS CVL "OC192-11,OC192:ESS,0", "OC192-11,OC192:SESS,0", "OC192-11,OC192:SEFSS,0", OC192-11,OC192:CVL,0, [/CODE] | |
Im new to perl and i want a perl script to convert each coordinate file of different proteins(decoys) to pdb file format.this is the script i wrote so far. open (f1, "rep.tra1"); while ($line = <f1>) { chomp $line ; @det+split (" ", $line ); $num= @det; if ($num = … | |
Hi Perl, I am looking for code where i can calculate a first saturday for all even months and first saturday for all odd Months. Moreover i need a code to find a second saturady for all months of the year. Can you please help me out that how i … | |
hi guys i wanna known that does Perl support to connect to mobile devices or not | |
Hi, I have a string like this: [CODE] $string ="datafiles/source/main_data_files/content.csv"; if($string=~/main_data_files\/(.*)\.csv/ig) { print "\n matched-- $1\n"; } [/CODE] I want to retrieve the csv file name i.e [CODE] content.csv [/CODE] I tried with the above code i am getting the result but i want some other better performance matching part. … |
The End.