Re: 4 questions

> Is there a 'bible' out there to read? Depending on you level of faith: "learning perl" by randal schwartz & tom phoenix "the camel book" by Larry wall bless you, wolf -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: a regular expression issue

hi, #!/usr/bin/perl use strict; use warnings; my $file; my @xfiles; @xfiles = ("canada", "cane", "cane02", "ca.e.02", "canine", ".hidden"); foreach $file (@xfiles){ #want canada only for this iteration if ($file =~ /(canada)/){print "$file\n - end first if - \n";} #wb: (expression)

edit pdf

hi there, I have a pile of pdf documents which may or may not contain email adresses. Now I do have to mask the [EMAIL PROTECTED] adresses into something like xyAT whereever.dot I looked at CAM::PDF and PDF::API2 - my CAM::PDF code would look like foreach my $file (@todo){ my $doc=CAM::PDF->ne

Re: Perl IDE

On Friday 05 March 2004 18:26, Alexander Douglas generously enriched virtual reallity by making up this one: > Hello Hello > I am new to perl and hence needs some help.. > > 1) Is there a good IDE to build perl forms for web. Emacs, VIM :-) Use the CGI module. > 2) If i have to connect perl to

Re: Perl IDE

On Friday 05 March 2004 18:26, Alexander Douglas generously enriched virtual reallity by making up this one: > Hello Hello > I am new to perl and hence needs some help.. > > 1) Is there a good IDE to build perl forms for web. Emacs, VIM :-) Use the CGI module. > 2) If i have to connect perl to

Re: Checking filenames? [:: ?Kinda Solved? ::]

On Friday 05 March 2004 02:03, Sumit Kaur generously enriched virtual reallity by making up this one: > Hi, Hi, > I have to write my first Perl script . This scripts Searches for rare = > codons in nucleotide sequence . The nucleotide sequence is entered by = > the user in the format "ATTGCAA..

Re: Checking filenames? [:: ?Kinda Solved? ::]

On Friday 05 March 2004 02:03, Sumit Kaur generously enriched virtual reallity by making up this one: > Hi, Hi, > I have to write my first Perl script . This scripts Searches for rare = > codons in nucleotide sequence . The nucleotide sequence is entered by = > the user in the format "ATTGCAA..

Re: Passing Data Between Servers

On Thursday 04 March 2004 22:26, Tim generously enriched virtual reallity by making up this one: > > Paul, > "Network Programming with Perl" by Stein is a good place to start. It > discusses forking children, blocking and non-blocking I/O, among others, > which will be considerations you'll want t

Re: Forking

On Wednesday 03 March 2004 21:57, Bob Showalter generously enriched virtual reallity by making up this one: Hi, > > - "1 while wait() > 0" > > That just reaps the exit statuses to prevent zombies; the children have > already exited (otherwise the loop wouldn't have exited.) You might want > the

Re: Forking

On Wednesday 03 March 2004 20:47, Price, Jason generously enriched virtual reallity by making up this one: Hi > Thanks for the input - it's quite helpful. and nice:-) > However, I don't fully > understand some of the code - maybe you could help clear it up for me. The > parts I'm unclear o

Re: Help with Radio_group

On Monday 01 March 2004 02:06, wolf blaum generously enriched virtual reality by making up this one: > On Sunday 29 February 2004 17:20, [EMAIL PROTECTED] generously > enriched virtual reality by making up this one: > > Hi > > > I have a script that processes a form input.

Re: Help with Radio_group

On Sunday 29 February 2004 17:20, [EMAIL PROTECTED] generously enriched virtual reality by making up this one: Hi > I have a script that processes a form input. What I want to do is this: I assume you are talking about a html form. > I have form elements: > > -radio_group1 > -radio_group2 > >

Re: Pattern matching problem

On Thursday 26 February 2004 12:28, Henry Todd generously enriched virtual reality by making up this one: > On 2004-02-26 00:43:21 +, [EMAIL PROTECTED] (Wolf Blaum) said: > > As I understand Biology, there is 4 nucleotid acids which gives 4**2 > > combinaions for dupplets. So

Re: Array question

On Friday 27 February 2004 01:18, Chris generously enriched virtual reality by making up this one: > Hi Guys, > > I have a problem with e-mail address's and an array. I have some code that > will be a documentation spider to go through all our technical > documentation, extract e-mail address's a

Re: Pattern matching problem

On Wednesday 25 February 2004 17:35, Henry Todd generously enriched virtual reality by making up this one: Hi, > I'm having trouble counting the number of specific substrings within a > string. I'm working on a bioinformatics coursework at the moment, so my > string looks like this: > > $sequen

Re: Is there an etc. command in perl?

On Wednesday 25 February 2004 21:52, Joel generously enriched virtual reality by making up this one: Hi, > Is there an et cetera type command in perl? Specifically, what I want to do > is to go from is there an etc command in any other programing language? > > while (1) { > my $num = shi

Re: Perl Newbie

On Tuesday 24 February 2004 15:49, Peterson, Darren - Contractor.Westar generously enriched virtual reality by making up this one: > Hello, all. I'm as green a Perl programmer as can be. As a matter of > fact, I am green in OO programming and network communications. I spent 12 > years maintain

Re: can't bind a reference using Tk

On Tuesday 24 February 2004 04:29, Michael Ragsdale generously enriched virtual reality by making up this one: .. > >However, dont pass the object - pass a refernece to it in line 2, like: > >my $go = $right->Button(-text=>'Get Data',-command=>sub{compute(\ > >$ent)})->pack(-side=>'top'); > > >

Re: can't bind a reference using Tk

On Monday 23 February 2004 18:31, Michael Ragsdale generously enriched virtual reality by making up this one: .. Hi Mike, > my $ent =$right->Entry(-width=>8,-background=>'white')->pack(-side=>'left'); ^line 1 > my $go = $right->Button(-text=>'Get > Data',-command=>sub{compute($ent)})->pack(-

Re: Checking for calling context

> Hey there, Hi > I have a set of functions that send an XML element, wait for a response, > parse the response, and return it. However, there are often cases where > the resulting XML is never used, and so parsing it is pointless. Is > there a way that a sub can tell where the result is going to g

Re: Which is better, opening and closing, or a massive file opening and a massive closing?

For Quality purpouses, [EMAIL PROTECTED] 's mail on Wednesday 11 February 2004 22:08 may have been monitored or recorded as: Hi, > I'm still working on the script, though it is cleaning up even better, I > even have it running cleaner by dumping anything not matching some specs. > What I am try

Re: How to Implement a BNF syntax in perl?

For Quality purpouses, Balaji Thoguluva 's mail on Friday 06 February 2004 18:49 may have been monitored or recorded as: > Hi, Hi > I have a long BNF (Backus-naur form) for parsing a protocol message. > Suppose I want to implement a BNF like this > > Response = Status-line >

Re: Script to parse files

For Quality purpouses, wolf blaum 's mail on Friday 06 February 2004 20:15 may have been monitored or recorded as: > easy: (notice: thats the same script as priviously but has the parse in a > sub:) > > ---snip--- > #!/usr/bin/perl > > use strict; > use warnings; &g

Re: Reg. string matching using reg-exp

For Quality purpouses, Balaji Thoguluva 's mail on Friday 06 February 2004 20:44 may have been monitored or recorded as: > Hi, > I am a novice to perl programming. When I execute the following code, > I get always "No Match". I guess my reg-exp is correct. I also tried > changing $line= "INVI

Re: Script to parse files

For Quality purpouses, LoneWolf 's mail on Friday 06 February 2004 16:57 may have been monitored or recorded as: > I've been working with this since wolf and jeff and john sent me some > stuff, I think I actually based everything on wolf's code excerpts. I'm > sure my final code is going to not b

Re: Remote script execution

For Quality purpouses, Thind, Aman 's mail on Thursday 05 February 2004 06:24 may have been monitored or recorded as: > Hello Friends, Hi > I want to write a script that when executed will get lots of details from > 10 different Unix(AIX) and Windows(XP) boxes and generate a report. > > The detai

Re: Make this into a script to parse?

For Quality purpouses, wolf blaum 's mail on Thursday 05 February 2004 06:07 may have been monitored or recorded as: > The script reads all files in the sql subdir of your home dir and produces > the corrosponding filname.out in your homedir. shame on me: of course it reads all the f

Re: Make this into a script to parse?

For Quality purpouses, Lone Wolf 's mail on Thursday 05 February 2004 04:23 may have been monitored or recorded as: Hi > Thank goodness I never said I had perfect code, because I would > definitely be lying. no worries - I post code to get feedback. Thats the whole ideaof learning it. > I att

Re: removing all elements in an array

For Quality purpouses, Markham, Richard 's mail on Thursday 05 February 2004 04:27 may have been monitored or recorded as: > How can I simply remove all elements in an array, given that the array > is global and a procedure defines the elements to where the total > number of elements in this arra

Re: (U) What are the best Perl books out there ... More than 1 is fin e ... list as many as you like

Hi, I like: Learning Perl by Randal Schwartz & Tom Phoenix as a good introduction with tons of further references Programing Perl by Larry Wall, Tom Christiansen and Jon Orwant as the ultimate refernce and pillow Mastering Perl/Tk by Steve Lidie and Nancy Walsh for times when I dont have acc

Re: Make this into a script to parse?

For Quality purpouses, Lone Wolf 's mail on Thursday 05 February 2004 00:52 may have been monitored or recorded as: > I'm back to dealing with the main issue of a badly formatted file being > brought down from an archaic system and needing to be cleaned up before > being passed to another user or

Re: Regarding Text Widget in Perl/Tk

For Quality purpouses, zentara 's mail on Saturday 31 January 2004 17:23 may have been monitored or recorded as: > > It's hard to say without showing us your script. well, the called script (not the gui) is bout 500 lines... > Try putting a "TK::after in the event loop to set the timing. That

Re: Regarding Text Widget in Perl/Tk

For Quality purpouses, zentara 's mail on Friday 30 January 2004 16:22 may have been monitored or recorded as: Hi, neat trick! Great. However, I have a, well, couriosity? My script looks pretty much the same, except the print in &dosomething (since it is acctually your script:-)) > Here is a

Re: A little help please?

For Quality purpouses, Joel 's mail on Saturday 31 January 2004 00:26 may have been monitored or recorded as: Hi, > I'm interested in learning to program perl, and I just got ActivePerl for > Windows. I am running XP and have a few questions. First off, how do I run > the interpreter under Wind

Re: Running Perl CGI from Windows

For Quality purpouses, Jan Eden 's mail on Friday 30 January 2004 20:17 may have been monitored or recorded as: Hi Jan > Like this: > > accept-charset="iso-8859-1"> ... Try enctype="application/x-www-form-urlencoded" instead. I had the very same problem using the xitami webserver on WinOs. D

Re: Running Perl CGI from Windows

For Quality purpouses, Jan Eden 's mail on Friday 30 January 2004 20:01 may have been monitored or recorded as: > Hi all, Hi .. > But accessing the script from a Windows machine gives me the prepared error > message. From the log I can see that all parameter values end up in the > $name variable,

Re: Perl/Tk and portability

For Quality purpouses, Gary Stainburn 's mail on Friday 30 January 2004 16:26 may have been monitored or recorded as: > Hi folks, > Hi Gary, > As I've never looked at Tk before I would appreciate people's opinions on > it. Specifically, how easy is it to develop, and how portable is it between >

Re: New Perl User needs help with POST in perl

For Quality purpouses, PerlDiscuss - Perl Newsgroups and mailing lists 's mail on Thursday 29 January 2004 23:49 may have been monitored or recorded as: > I have written my HTML code to where it uses POST to collect information. > Where do I start to write a script that collects the data from the

Re: Use and Require

For Quality purpouses, Mallik 's mail on Thursday 29 January 2004 18:57 may have been monitored or recorded as: > Dear Perl Gurus, that must be someone else > > What is the difference between Use and Require. > try perldoc -f use on your box (or www.perldoc.com): use Module VERSION LIST

Re: goto command

For Quality purpouses, Thomas Browner 's mail on Thursday 29 January 2004 18:46 may have been monitored or recorded as: > Does perl have a goto command. For example if you tell scrip to do > something and it returns a 1 then it should go to a block of code that > does something else. Not talking

Re: array push

For Quality purpouses, Rob Dixon 's mail on Tuesday 27 January 2004 00:30 may have been monitored or recorded as: > The right conclusion for the wrong reasons Wolf! The spaces are the result > of interpolating the array into a string, and the presence of a newline on > each array element is immat

Re: array push

For Quality purpouses, Rob Dixon 's mail on Tuesday 27 January 2004 12:42 may have been monitored or recorded as: > Didn't you mean to put spaces before the last three records? This will be > the result of > .. well - in Anthonys original mail there were spaces - i just copied that. > > Or did

Re: Slices

> > @arary[3...] but this doesn't work?. What about @array[3..$#array] PS: @arary = typo? Wolf -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: array push

For Quality purpouses, Anthony J Segelhorst 's mail on Monday 26 January 2004 17:17 may have been monitored or recorded as: > How come when I push a variable to an array it puts one whitespace before > the variables on all the lines except the first one?  I would except all > the lines not to hav

Re: String concatenation qn

For Quality purpouses, Ajey Kulkarni 's mail on Saturday 24 January 2004 17:52 may have been monitored or recorded as: > hi,. hi > i would like to quickly append a string to a variable. > open NEWFH, "> $filename.new" or die "new procmailrc err"; > where $filename has /tmp/xyz > > Anything reall

Re: From 5.6.1 to 5.8.2: how preserve installed modules?

Hi, i ont want to get involved in the religios questions: for the rest: > use PPM or CPAN.pm? - How can I get PPM to tell me everything that's > installed? ppm> query * #gives you the list of installed modules ppm> properties Mo::Dule #gives you a detailed discriptio of that installed modul

Re: can i do it with perl ?

> Give me a little bit of time with a soldering iron, some wire, and a > laptop connected to your home network and your dishwasher and that can > be rectified. :-D I new that was a gentle list! I just dont have a dishwasher :( But given the traffic here I happily dont get much time to use dishes

Re: can i do it with perl ?

> I there, Hi, > I need to write a web database application using > perl, and i need a way that when the users logs into > the system i download all the information regarding > to the user to its local computer and make all the > transaction locally. After that, when the user logs > out o

Re: complex data file parsing

Hi, > As far as your follow up question on the B lines, "only line with a B in > the beginning in set?," I'm not sure if I understand. If you mean that > there will only be 1 line per order (set of lines A-T) with a B in the > first position, you are correct. yes, thats what I meant. Sorry abou

Re: Need help comparing lines in two files

> This very green newbie would like to compare two files, let's say File1 > and File2. I > want to put the difference from File2 only, into a new file, File3. I had a very simliar problem about a week ago, which James answerd here: http://groups.google.com/groups?q=Perl+looping+(a+lot+of) +file

Re: How to take command line argument and use it to run an upgrade script.

> My Compliments on a well done piece. OT: see, a logical problem I have with newsgroups is that you learn most (at least I do) by trying to explain things you think you understood to others - "beginning explainers" however make mistakes - Thats of course not what you want in a newsgroup, si

Re: complex data file parsing

hi, > I know that each block always starts with and A in the first position of > the first line and ends with a T in the last position of the last line. isnt it a T in the first position of the last row of the set? > I know that the second line starts with a B, and the data in the 5th space > on

Re: How to take command line argument and use it to run an upgrade script.

> I'm a perl newby. me too:-) Right list, I assume. > I'm looking on taking a command line argument from > STDIN and use it for input to a script that upgrades > software. Any examples would be greatly appreciated. @ARGV holds your command line arguments. call: scriptname.pl Universe 42 dougl

Re: IO File Problems

> hi there, hi | servus, > 2) now i have to merge this strings with strings from a file. in this file > there are many configuration sections. > the section i need looks like this: > > [WHITELIST] > [EMAIL PROTECTED] > [EMAIL PROTECTED] > [EMAIL PROTECTED] > > so i need to get all adresse under t

looping through (a lot of) files

Hi there, I do have one type A file, that holds about 25.000 A-ids, one per line. Furher I have 500 type B files in a dir that hold 10-500 B-ids each, one per line. All files are -T Now i want to generate 500 type C files, corrosponding to the b files: each B-id, that occours in a B-type file A

Re: Reading/Writing Hash to Excel

Hi, > I have successfully extracted the data I need and I am attempting to write > the data into rows in excel. > well, there is wonderful (as most of them:-) CPAN Module called: Spreadsheet::WriteExcel that allows you to write in excel files, create additional worksheets and that sort of stuff

Re: wannabie asks Mail::POP3Client && Mail::Audit

Follow-up: > The problem: > even though a print join ("\n",[EMAIL PROTECTED]); shows me there are > "Content-type: multipart\mixed" headers my first attempt to find them > manually fails and gives me only the "Content-type: text/plain" or > "..application/blabla" lines from the mail body of mu

wannabie asks Mail::POP3Client && Mail::Audit

Hi, Im new (here|to perl) and would like to start of with that: My script should replace attachmends in mails: however, i cant find any atts. Script first: -- #! /usr/bin/perl use strict; use warnings; use Mail::POP3Client; use Mail::Audit qw(Attach); my $pop=new Mail::POP3Client(USER =>

Re: printf

Am Montag, 22. Dezember 2003 20:17 schrieb Perl: > i know what " %9.1f" would have done in this case. > but how does " %9.2g" round off ? the FORMAT notation used by prinf, sprintf, ... can be found on http://www.perldoc.com/perl5.8.0/pod/func/sprintf.html which gives: %e a floating-point

Re: printf

Am Montag, 22. Dezember 2003 20:17 schrieb Perl: > i know what " %9.1f" would have done in this case. > but how does " %9.2g" round off ? the FORMAT notation used by prinf, sprintf, ... can be found on http://www.perldoc.com/perl5.8.0/pod/func/sprintf.html which gives: %e  a floating-point

RE: RegEx Troubles

>Given this in $_ >Most popular title searches:HREF="/title/tt0244365/">"Enterprise" (2001)" > >why would this regex not put digits in $1 ? > >$data2 =~ /popular title searches:<\/p>HREF=\"\/title\/tt(\d*)\/\">/ > Hi, Snip--- $data2='Most popular title searches:"Enterprise" (2001)"'; $data2 =~