Re: cgi:param problem

Theuerkorn Johannes wrote at Tue, 25 Jun 2002 14:58:45 +0200: > Hi there, > > i´ve got to pass a serial number to a perl.cgi. Doing it via the cgi:param funktion >seems not to > work. > > >>use strict; >>use CGI; >>use DBI; >>my $cgi_obj = new CGI; >>my $seriennummer = $cgi_obj->param("serien

Re: Pattern Matching

Anthony Akens wrote at Tue, 25 Jun 2002 15:49:53 +0200: > I'm trying to find a way to match anything between two brackets [] The stuff in >between will > have alpha, numeric, and symbols (including / - @ and spaces) > > For instance > > [akens@egh-org blah/blah/blah] > > I need to matc

Re: CPAN: install Bundle::CPAN

eric-perl wrote at Tue, 25 Jun 2002 07:16:45 +0200: > What the heck is Bundle::CPAN? What is going on? It seems like it's installing a >completely new > version of Perl or something. (It wanted to know where my C compiler is and where it >should > install stuff!!!) >From the Documentation of

Permission denied on a directory

Hello! I have two problems: (1) I'm using Linux and I created directories using the following code: mkdir("/data/homewww/../balginst", 0755) or die The directories are being created. The problem is, when I try to open the directory for writing, I get the message No permission. (2) $path="/data/

Re: Embedded Perl

Nigel Peck wrote: > I'm interested to know what solutions people use/like for embedding Perl > in HTML/XML documents to be processed by the web server (like PHP and > ASP), for Apache. I like the fact that the syntax for PHP is > (it complies with XML) and would like to be able to do it using my

CPAN: install Bundle::CPAN

Hello, All: This is my first time using the CPAN module. While using CPAN to download/install a module, CPAN reported that I should run 'install Bundle::CPAN' to get the latest stuff. When I entered 'install Bundle::CPAN' it went about it's business getting and make'ing and started asking abou

Re: Just started perl, but have run into a problem

Robert Warning wrote: > Hello Everyone! Greetings > ... My only problem is that when I put > #!/usr/bin/perl at the beginning of any of my programs it wont run. I > get an output from the shell that says /usr/bin/perl: bad interpreter: > Permission denied. I could only run the script if I typed

Re: Debugging the debugger

On Mon, Jun 24, 2002 at 10:10:38PM -0700, Harry Putnam wrote: > The documentation in TERM::Readline at ENVIRONMENT reads like maybe > some kind of cut and paste editing went wrong or something. It reads > like gibberish. The usage of the words `head' `tail' and `ornaments' > is confusing to the

Re: search-engine, searching for 2 words

> So in short : > I want to match 2 words within .txt documents, if the document contains BOTH words >I'dd like to print it. I am assuming you mean strings, whereas a word would be surrounded by space ala: /\s$word\s/. To rephrase what you want a little, you want to track how many times

cutting files ..!

I wrote a program to cut desired size of files but it is not working. I added that script. If anyone help me, thank you.. Bryce use POSIX; # for ceil # # # # # # # print "Please type filename of the DNA sequence data : "; $filename = ; chomp $filename; open FILE, $filename; @dna = ; #

Re: Useless use of a constant in void context

On Tue, Jun 25, 2002 at 11:07:01AM -0700, Gbio Qi wrote: > > Hi, Here I have a program called 'emboss.pl', when I run it with > perl5.6.1, it gives me the following error: > > # /compbio/programs/perl-5.6.1/bin/perl5.6.1 emboss.pl > Useless use of a constant in void context at >/compbio/program

RE: Initializing CPAN

On Tue, 25 Jun 2002, Fontenot, Paul wrote: > Let it have 20 and 21 for ftp I poked a hole in the firewall to accept all related/established packets coming *from* ports 20 & 21 but that didn't work. I seem to recall that ftp actually uses two different ports for the same dialogue. Can anyone refr

RE: Just started perl, but have run into a problem

> -Original Message- > From: Robert Warning [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, June 25, 2002 2:45 PM > To: [EMAIL PROTECTED] > Subject: Just started perl, but have run into a problem > > > Hello Everyone! > Well after using php to help make a couple web pages > I needed

Re: Just started perl, but have run into a problem

Robert -- ...and then Robert Warning said... % % Hello Everyone! Hello! % Well after using php to help make a couple web pages I needed a % scripting language for client side apps. Since php is best left for web % development I decided to learn perl because php is based on perl and I

Just started perl, but have run into a problem

Hello Everyone! Well after using php to help make a couple web pages I needed a scripting language for client side apps. Since php is best left for web development I decided to learn perl because php is based on perl and I thought it would be a fairly easy undertaking to get a good grasp i

Initializing CPAN

Hello, All: Does CPAN use http? I'm using it on a machine that has all ports except smtp/ssh/http/https blocked. (i.e., ports 22/25/80/443 are the only open ports) I've just started using the CPAN module for the first time and am having some trouble during initialization: The process dies after

Useless use of a constant in void context

Hi, Here I have a program called 'emboss.pl', when I run it with perl5.6.1, it gives me the following error: # /compbio/programs/perl-5.6.1/bin/perl5.6.1 emboss.pl Useless use of a constant in void context at /compbio/programs/perl-5.6.1/lib/site_perl/5.6.1/EMBOSS/GUI.pm line 1752. Content-typ

Re: Looping Control structures

On Jun 25, bob ackerman said: >> perl -lane'$a{$F[0]}++or$a=qw/box robo rain/[$b++%3];print"$F[0] $a"' >> yourfile.txt >i assume things like '$a' ,'$b', and '$F' come from those switches, so >only question is... @F comes from the -a switch used in conjunction with -n. $a, %a, and $b are just

Re: Looping Control structures

on Tue, 25 Jun 2002 16:45:31 GMT, Bob Ackerman wrote: > where are those command line switches documented? > i would have thought 'perldoc perl' ... but, i didn't see it there, nor > apparently in any other doc title it mentioned perldoc perlrun perlrun - how to execute the Perl interpre

Re: Looping Control structures

On Tuesday, June 25, 2002, at 04:59 AM, John W. Krahn wrote: > Will Shiver wrote: [...] > perl -lane'$a{$F[0]}++or$a=qw/box robo rain/[$b++%3];print"$F[0] $a"' > yourfile.txt > > > John sure. almost obviously. but... i assume things like '$a' ,'$b', and '$F' come from those switches, so on

Weekly posting statistics - 25/2002

Weekly posting statistics for perl.beginners - week 25 of 2002. >From Monday 2002-06-17 to Sunday 2002-06-23 there were 559 articles posted (25956 lines) by 116 authors, giving an average 4.82 articles per author, and an average article length of 46 lpa. The average number of articles per day w

Re: search-engine, searching for 2 words

I did it by creating an array of file IDs for each search word and then checking each element in one of the arrays to see if it existed in all of the others, and discarding it if it didn't. HTH Nigel >>> David vd Geer Inhuur tbv IPlib <[EMAIL PROTECTED]> 06/25/02 02:51pm >>> Hello, I am curren

Re: getting date from localtime

On Tuesday, June 25, 2002, at 07:01 , Johnson, Shaunn wrote: > ($mday, $mon, $year) = (localtime())[3 .. 5]; have you thought about the off set values of $wday? my ($mday, $mon, $year,$wday) = (localtime())[3 .. 6]; $year += 1900; my $k_mon = $mon + 1; my @day_oh_week = qw/Sun Mon Tues Wens

Re: Looping Control structures

On Monday, June 24, 2002, at 05:10 , Will Shiver wrote: > black robo plan A: my %kombo = ( blue=> 'box', red => 'robo', purple => 'rain', green => 'box', black => 'robo', ); hence one would read with say while() {

RE: HElP ...me!

Please reply to the list. is this one record of the file or is this an entire file? be sure and read the docs for doing this kind of thing: perldoc -f open -- basically you want to do something like this. this is enought to get you started. you won't learn anything if i write it for you. open(F,

Re: Dear answerers - sorry

Sorry to have incensed many of you with what was a genuine oversight in omitting a subject. Richard > Jenda, et al -- > > ...and then Jenda Krynicky said... > % > ... > % I would like to ask all the people who invest their time and answer > % the questions in this list to ignore the posts whos

RE: getting date from localtime

>Howdy: >I'm trying to do the following (which may have >been created already) in perl: >* create two variables >var1 = this will be sunday of current week always >var2 = this will be saturday of current week always >I'm not sure how I can use 'localtime' as a tool >for identifying var1 and

RE: getting date from localtime

>Howdy: >I'm trying to do the following (which may have >been created already) in perl: >* create two variables >var1 = this will be sunday of current week always >var2 = this will be saturday of current week always >I'm not sure how I can use 'localtime' as a tool >for identifying var1 and va

RE: Pattern Matching

>This will work... > /\[.*?\]/ Does exactly what I needed >Probably more explaination than you wanted, but I felt like sharing :) Explanations help me learn - maybe someday I'll be able to do these on my own :) >Rob -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mai

getting date from localtime

Howdy: I'm trying to do the following (which may have been created already) in perl: * create two variables var1 = this will be sunday of current week always var2 = this will be saturday of current week always I'm not sure how I can use 'localtime' as a tool for identifying var1 and var2. I m

RE: Pattern Matching

>I'm trying to find a way to match anything between two brackets [] The stuff in >between will have alpha, numeric, and symbols (including / - @ and spaces) >For instance >[akens@egh-org blah/blah/blah] >I need to match that entire string, including the []'s >Here's the ugly thing I'v

RE: Pattern Matching

This will work... /\[.*?\]/ The ".*?" means "match any character any number of times... BUT be non-greedy about it". The "?" is what makes it non-greedy, and that means it will attempt to match as few characters as possible. ...So in essence this says "match an open bracket up to the first clo

RE: Embedded Perl

For embedding I've tested Mason and Embperl and found that Embperl for less complicated and allowed for easier to read code (which is important when you are working in a team). But I have recently moved to HTML::Template. I really like the separation of HTML and code that it allows and I also fe

Re: Embedded Perl

on Tue, 25 Jun 2002 13:46:29 GMT, [EMAIL PROTECTED] (Nigel Peck) wrote: > I'm interested to know what solutions people use/like for > embedding Perl in HTML/XML documents to be processed by the web > server (like PHP and ASP), for Apache. I like the fact that the > syntax for PHP is (it complie

Pattern Matching

I'm trying to find a way to match anything between two brackets [] The stuff in between will have alpha, numeric, and symbols (including / - @ and spaces) For instance [akens@egh-org blah/blah/blah] I need to match that entire string, including the []'s Here's the ugly thing I've gotten

search-engine, searching for 2 words

Hello, I am currently working on a search-eingine for .txt files I am searching for $word in each .txt file. Now of course the ability to search for 2 words in the document, must become possible. Does any of you have an idea how to compare two hashes for the same entries ? I will show you :

Embedded Perl

I'm interested to know what solutions people use/like for embedding Perl in HTML/XML documents to be processed by the web server (like PHP and ASP), for Apache. I like the fact that the syntax for PHP is (it complies with XML) and would like to be able to do it using my Perl skills instead of lea

RE: HElP ...me!

can you tell us how the data is file is formatted currently? also and code you have done so far. and what you want to do with it? > -Original Message- > From: Baris Ozol [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, June 25, 2002 9:10 AM > To: [EMAIL PROTECTED] > Subject: HElP ...me! > >

RE: HElP ...me!

>Hi everybody, >Hopefully some of you will help to solve my problem!! >I'm trying to parse a flat file formatted file. It's a PDB (Protein Data >Bank). >But I didn't find any script on internet and perl.com. >If you'll help me, I will be happy and solve the problem.. >Thank you. >Bryce Can Y

HElP ...me!

Hi everybody, Hopefully some of you will help to solve my problem!! I'm trying to parse a flat file formatted file. It's a PDB (Protein Data Bank). But I didn't find any script on internet and perl.com. If you'll help me, I will be happy and solve the problem.. Thank you. Bryce -- To unsu

RE: if-statement and grep in one go

On Tue, 2002-06-25 at 03:28, David vd Geer Inhuur tbv IPlib wrote: > > Hello, > > Thanks for the solution Bob. > Changed some stuff and have 2 questions open. > > my $line; > my (%u, %g); > open(FILE, "< ${dir}/user.perm") or print "Failed opening file $!"; ## 1 > while ($line =

cgi:param problem

Hi there, i´ve got to pass a serial number to a perl.cgi. Doing it via the cgi:param funktion seems not to work. >use strict; >use CGI; >use DBI; >my $cgi_obj = new CGI; >my $seriennummer = $cgi_obj->param("seriennummer"); Passing http://server/script4.pl?seriennummer=CN+/P422 results i

RE: if-statement and grep in one go

> -Original Message- > From: David vd Geer Inhuur tbv IPlib > [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, June 25, 2002 6:28 AM > To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; > [EMAIL PROTECTED] > Subject: RE: if-statement and grep in one go > > > > Hello, > > Thanks for the solution Bob.

RE: if-statement and grep in one go

on Tue, 25 Jun 2002 10:28:07 GMT, [EMAIL PROTECTED] (David Vd Geer Inhuur Tbv Iplib) wrote: > Changed some stuff and have 2 questions open. > [code snipped] > 1) I don't like to die in my script as there are many files to >read. And if I can't open the current file I just want to >con

Re: Looping Control structures

Will Shiver wrote: > > I have a file that I would like to read thru line by > line and print somthing based on when the value in > the first field postion stays the same. I would change > the tag value amongst 3 different values. > > Example file: > blue jay > blue bery > blue bird > red apple

Re: Sockets

> Basically, I need to know what I should specifically be > looking > at...Thoughts? Look at Lincoln Stein's excellent "Network Programming with Perl" -- felix -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands,

Re: HTML::Parse & strip the html

on Tue, 25 Jun 2002 06:18:34 GMT, [EMAIL PROTECTED] (Alan C.) wrote: > And there's plenty of html tables in the source code here which > all it has for output is a bunch of "TABLES NOT SHOWN" just like > that in caps. > > With this latter url, how do I make it just to strip the html so > that

Looping Control structures

I have a file that I would like to read thru line by line and print somthing based on when the value in the first field postion stays the same. I would change the tag value amongst 3 different values. Example file: blue jay blue bery blue bird red apple red car red man purple people green gr

RE: if-statement and grep in one go

Hello, Thanks for the solution Bob. Changed some stuff and have 2 questions open. my $line; my (%u, %g); open(FILE, "< ${dir}/user.perm") or print "Failed opening file $!"; ## 1 while ($line = ) { ## 2 if ($line =~ /^user:/) {

Thanks

Thanks, that's a neat trick - I hadn't realised you could still capture things from within a lookahead. Richard > On Jun 24, Richard Adams said: > >> @peptides = $sequence =~ /(\w{4}S\w{4})/g; >> >> this works up to a point, but if there are 2 adjacent 'S' the 2nd one >> is not extracted, I g