Re: Help with Perl 6 script

do.org/. regards marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: Installing Module::Build::Tiny from CPAN fails . . . because it requires Module::Build::Tiny!?! WTF?

Hi Brian, Very nicely explained. I suppose Perl Beginners is not the best forum for this question. I clearly didn't understand the various ways to use prove. Thanks, --Marc On Sun, Feb 16, 2014 at 10:13 AM, Brian Fraser wrote: > On Sat, Feb 15, 2014 at 10:34 PM, Marc Perry wrote:

Re: Installing Module::Build::Tiny from CPAN fails . . . because it requires Module::Build::Tiny!?! WTF?

a few variations until I get it to work. --Marc On Sat, Feb 15, 2014 at 7:13 PM, wrote: > Hi Marc, > > Version 0.034 installed ok for me on Strawberry Perl. > > The simple.t test script was unable to unlink a dll it had created and > produced a few warnings in relation to th

Installing Module::Build::Tiny from CPAN fails . . . because it requires Module::Build::Tiny!?! WTF?

ying to install). Surely this is a bug? --Marc

Tips or Tricks to print out tab-separated data?

. So when it is important I do this instead: print join "\t", @array; print "\n"; I suppose you could put both statements on a single line. Is there a simpler/faster way to generate this output: boris\tnatasha\trocky\tbullwinkle\n? Thanks, -- Marc

Re: recover data generated by jqurety from a form

Yes. It works, i fuond out the solution yesterdey, i did not recover the csv_text parameter propierly Thanks El 30/05/2013 0:29, "lesleyb" va escriure: > On Wed, May 29, 2013 at 03:09:51PM +0200, Pau Marc Muñoz Torres wrote: > > Hi guys > > > > i have a proble

recover data generated by jqurety from a form

Hi guys i have a problem recovering from data using my cgi, lets says i got the following form And i want to recover the info generated by the javascript funtion ( getCSVdata() ), do you know how i could do it? param('submit') returns "Get CSV File" thanks Pau Ma

Re: dinamic table creation with cgi.pm

Hi Shlomi thanks you for your advise, next time i would do it carefully pau 2011/10/28 Shlomi Fish > Hi Pau, > > in addition to what Shawn has written, here are a few comments on your > code: > > On Fri, 28 Oct 2011 15:22:26 +0200 > Pau Marc Munoz Torres wrote: > >

Re: dinamic table creation with cgi.pm

thanks! 2011/10/28 Shawn H Corey > On 11-10-28 09:22 AM, Pau Marc Munoz Torres wrote: > >> Hi everbody! >> >> I just discovered CGI.pm package and i think it's cool, but i still >> having >> a couple of dubts >> >> Imagine i got a pi

dinamic table creation with cgi.pm

Hi everbody! I just discovered CGI.pm package and i think it's cool, but i still having a couple of dubts Imagine i got a pice of script like that use DBI; use CGI; my $h=new CGI() ; ## some DB connection print $h->header; print $h->start_html; my $query=$q->prepare("select name, age f

Re: Capitalizing Acronyms

{3,4}|[bcdfghjklmnpqrstvwxz]{3,4})\b/\U$1/ig; This now allows me to step it down to {2,4} without capitalizing the 'st' in 51st. Thanks again, Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: Capitalizing Acronyms

kj. So I changed that line to: $string =~ s~\b([aeiouyAEIOUY]{3,4}|[bcdfghjklmnpqrstvwxzBCDFGHJKLMNPQRSTVWXZ]{3,4})\b~uc$1~eg; and now it works, even though it's a mile long. ;) Thanks for helping me to think about it differently. Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl

Re: Capitalizing Acronyms

for capitalization except for that one regex which throws a wrench into it. Thanks, Marc --- # http://daringfireball.net/2008/08/title_case_update use strict; use warnings; use utf8; use open qw( :encoding(UTF-8) :std ); my @small_words = qw( (?http://learn.perl.org/

Re: Capitalizing Acronyms

to use the original string without having to split it and create new arrays just for this one feature, and it's simpler than I had hoped for. Most importantly, I understand it! =;) Thanks again, Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands

Re: Capitalizing Acronyms

Sorry, but you've lost me here. Could you give an example? Thanks, Marc my $string = 'Off The Menu'; my @words = split(/ /, $string); my @new_words; foreach my $word (@words) { if ((length $word >= 3 and length $word <= 4) and ! ($word =~ m/^[aeiouy]$/i or $

Re: Capitalizing Acronyms

Jim and David, > m/^[aeiouy]+$/i I tried your suggestions but it still gives the same result: my $string = 'Off The Menu'; my @words = split(/ /, $string); my @new_words; foreach my $word (@words) { if ((length $word >= 3

Capitalizing Acronyms

e word 'THE'. What am I doing wrong? Thanks, Marc use strict; use warnings; my $string = 'The Kcl Group'; my @words = split(/ /, $string); my @new_words; foreach my $word (@words) { if ((length $word >= 3 and length $word <= 4) and ($word !~

Re: Moose

Klaus, > checking CPAN for Moose gives me a list of about 2000 entries related > directly or indirectly to Moose. In case you're interested, there's also a Moose mailing list which would probably be of more help to you with all things Moose. moose-subscr...@perl

Re: Sandboxing while I am learning

Shawn, > if you use perlbrew and local::lib you > can test different perl versions and then different environments. I haven't looked into local::lib yet. What advantage does that give you over a plain perlbrew install? Marc -- To unsubscribe, e-mail: beginners-unsubscr...@p

Re: Sandboxing while I am learning

deserve to lose the data. Besides, that's what backups are for. =;) Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: Sandboxing while I am learning

configured for each Perl, I have different environments depending on the version and it works great. This post may help: http://blog.fox.geek.nz/2010/09/installing-multiple-perls-with.html Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail:

Re: Hardware?

7;re not running a production server with it, whatever you have should work fine. However, if you can max out the RAM, I would at least do that. Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: XAMPP

witch between them easily, but it makes installation SO mush easier, especially with cpanm. Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: Grabbing an element deep inside a nested hash

foreach my $cartitem ( sort sortby_itemid keys %{$main::global->{cart}} ) { # list the items... } sub sortby_itemid { (split /\t+/, $main::global->{cart}->{$a})[2] cmp (split /\t+/, $main::global->{cart}->{$b})[2] } Thanks again for your help, guys. I r

Grabbing an element deep inside a nested hash

bel "...) as an HASH ref while "strict refs" in use Anyway, maybe I'm going about this the wrong way. I know enough just to be dangerous at this point. The bottom line is, how would I go about grabbing the item numbers from the original hashref so that I can sort th

Re: Perl modules that "phone home"

On Jul 29, 2011, at 5:34 PM, shawn wilson wrote: > Hmmm, Acme::CC::Bandit anyone? I wonder how many others fell for that one? =:\ That's not a nice trick to play on a "beginners" list, ya know. =;) -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional command

Re: Perl modules that "phone home"

y for the false alarm. Thanks for your help, Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Perl modules that "phone home"

Ghana! How can I find out which module(s) is doing this? I don't want to go live until I'm able to stop this, since I don't know how much, if any, of the customers information may be compromised. Thanks, Marc -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For ad

Re: Subdirectories and use lib

. That's all it took to get it to sink in. > http://perl-begin.org/topics/modules-and-packages/ I went back and re-read chapter 10 of "Beginning Perl" and it _finally_ makes sense to me now. Thanks again, Marc BTW, I would like to thank everyone who responds to quest

Re: Arrow Notation vs. Colon Notation

?? =;) That also cleared up a strange problem I was having with my code. Boy, am I embarrassed. On the plus side, this ordeal has helped to solidify it for me, so I guess it's O.K. to make stupid mistakes once in awhile, no? Thanks, Uri. Marc -- To unsubscribe, e-mail: beginner

Arrow Notation vs. Colon Notation

I've noticed that the following two lines seem to be equivalent when calling a sub from a module called Lib.pm: Lib->load_config("config.dat"); Lib::load_config("config.dat"); Is this just a case of TIMTOWTDI or is there a difference in how they

Subdirectories and use lib

e lib "/Applications/MAMP/cgi-bin/cart/sql/lib/Module/"; use lib "/Applications/MAMP/cgi-bin/cart/sql/lib/Params/"; use lib "/Applications/MAMP/cgi-bin/cart/sql/Business/CreditFraud/"; etc... Or am I going about it the wrong way? Thanks, Marc -- To unsubscribe

Re: File::Find script questions

modules and there seems to be a million of them. Could you recommend a couple that you like? Thanks again, Marc -- #!/usr/bin/perl use strict; use warnings; use File::Find; use File::Slurp; my $path_to_search = $ENV{HOME}.'/public_html'; my $file_name = '

File::Find script questions

comments are welcome. Also, do I really need the foreach block in there? I couldn't get it to work without it, but it seems like I should be able to. =:\ Thanks, Marc #!/usr/bin/perl use strict; use warnings; use File::Find; use File::HomeDir;

use strict / nostrict

ts to turn them off? In the grand scheme of things I'm still relatively new to all this, but it makes total sense to me. If they should be used in most every script, why waste the time and thought of always having to remember (or remind others) to add them? Thoughts? Marc -- To unsubscri

Re: Unintended behavior: Range operator inside a while loop continues to pattern match on the subsequent file

Thanks, Paul. A very thoughtful response--I will try this out (I don't recall every encountering the ?? operator, but if it works as advertised I will likely use it a lot). --Marc On Thu, Apr 21, 2011 at 3:29 PM, Paul Johnson wrote: > On Thu, Apr 21, 2011 at 01:42:42PM -0400, Marc Per

Re: Unintended behavior: Range operator inside a while loop continues to pattern match on the subsequent file

Beautiful; I should've known that brian d foy would have come up with a solution--I even have a copy of that book! Thanks, --Marc On Thu, Apr 21, 2011 at 3:10 PM, Brian Fraser wrote: > http://www.effectiveperlprogramming.com/blog/314 > > Brian. > > On Thu, Apr 21, 2011 at

Unintended behavior: Range operator inside a while loop continues to pattern match on the subsequent file

end of the physical file (or at any other time for that matter)? Thanks, --Marc

Re: two errors

Thursday 28 October 2010 16:04:19 Pau Marc Munoz Torres wrote: > > Hi every body > > > > recently i compiled a svmlight perl module two use svmlight program with > > perl > > > > > http://search.cpan.org/~kwilliams/Algorithm-SVMLight-0.09/lib/Algorithm/S

two errors

so: undefined symbol: set_learning_defaults I would appreciate is some of you could tell me what does "symbol lookup error" and "undefined symbol" means, by the way, set_learning_defaults is deffined at the patch Thanks pau -- Pau Marc Muñoz Torres Laboratori de Biologia Comp

What is the difference between: 'my $var = 1' vs. 'my ( $var ) = 1'?

heses when declaring a single variable? Thanks, --Marc

Comparison of the comma versus the period in print statements

therefore the comma syntax is used to separate items in a list), but is catenation somehow faster/more memory efficient? Thanks, --Marc

Re: DBI driving me nuts ... !

_address | > ++ > | iv...@systems.xxx| > | tkek...@stpeters.xxx | > | dfou...@howden.xxx | > | melan...@mdlulisharp.xxx | > | er...@mdlulisharp.xxx| > | desi...@oas.xxx | > | dbalakis...@multivid.xxx | > | bhar...@we

Re: 2 files, 1 package, shared constants

Stanisław T. Findeisen schrieb: -BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Hello there My application consists of several files. Some of them are to be run as CGI scripts, the others from command line. There is also a "common" file with constants and shared routines. The question is: what i

Re: Reading 2 array lists

ted at C:\scripts\doubletakecheck\test.pl line 4. On Thu, Feb 19, 2009 at 4:25 PM, Chas. Owens wrote: > On Thu, Feb 19, 2009 at 15:19, marc ritorto wrote: > > will this module work with activestate perl ? > snip > > With ActivePerl you need to look at the build status page* to see

Re: How to speed up two arrays compare.

tch; @mat...@c}=(1) x @c; say "\...@a=\@c" if @a ~~ %match; # But this works. Or if you don't have perl5.10.0 print "\...@c=\@a\n" if @{...@match{@a}]} == scalar(@a) ; #Not perl5.10.0 way Does anyone have a better idea how to force list context in the last line? scalar(@

Re: Text search engine [OT]

available as well. Teaching material is available but tailored towards biologists. Best, Marc Raymond Wan schreef: Hi Dermot, Off-topic, so I hope no one minds if I reply. Perl is good at manipulating text strings, but that doesn't usually help search engine implementations. A s

Fwd: how to refresh between different pages of the same script

{ my $html = ""; $html = < CGI::Ajax Multiple Return Value Example form2 EOT ; return $html; }; my $pjx = CGI::Ajax->new( 'jsFunc' => $concatter); $pjx->JSDEBUG(1); $pjx->DEBUG(1); print $pjx->build_html($q,$Show_Form); # this outputs the

how to refresh between different pages of the same script

{ my $html = ""; $html = < CGI::Ajax Multiple Return Value Example form2 EOT ; return $html; }; my $pjx = CGI::Ajax->new( 'jsFunc' => $concatter); $pjx->JSDEBUG(1); $pjx->DEBUG(1); print $pjx->build_html($q,$Show_Form); # this outputs the

assign javascript variables to a perl variables using ajax

ction valor(){ var res; res=prompt("introduir nom",""); } EOHTML return $html; }; -- Pau Marc Muñoz Torres Laboratori de Biologia Computacional Institut de Biotecnologia i Biomedicina Vicent Villar Universitat Autonoma de Barcelona E-08193 Bellaterra (Barcelona) telèfon: 93 5812807 Email : [EMAIL PROTECTED]

Re: Can't find string terminator "EOHTML" anywhere before EOF

mmm i did in a single line and i keep havinh the problem my $html = <Enter something:EOHTML return $html; 2008/4/4, Rob Dixon <[EMAIL PROTECTED]>: > > Pau Marc Munoz Torres wrote: > > Hi > > > > I just copied this script from CGI::Ajax manu

Can't find string terminator "EOHTML" anywhere before EOF

} And I get the error: Can't find string terminator "EOHTML" anywhere before EOF at ./ajax.pl line 37. What's wrong? -- Pau Marc Muñoz Torres Laboratori de Biologia Computacional Institut de Biotecnologia i Biomedicina Vicent Villar Universitat Autonoma de Barcelona

Re: dinamic cgi with perl

Hi is There some easy-understanding "how to use ajax with perl" tutorial somewhere? i just need to know how to do a cgi script to launch a prompt (javascript) and use the answer in my script please help!! pau -- Pau Marc Muñoz Torres Laboratori de Biologia Computacional I

dinamic cgi with perl

. To solve it i was thinking on introduce a javascript code into my cgi, but i don't know how to pass the variable info between perl and javascript. could any of you tell me how to do it or give me any idea or give me a solution of how do it? thanks pau -- Pau Marc Muñoz Torres Laborato

Re: loading scripts to mysql

hi, Tanks for your help, finally i found the "source" command. It work like this: mysql> source /Lhome/geruppa/mhc/Pack_Ref_web/prova.sql 2007/11/9, Michael Gargiullo <[EMAIL PROTECTED]>: > > On Fri, 2007-11-09 at 13:22 +0100, Pau Marc Munoz Torres wrote: > &

indexing tables using my owns functions

erver version for the right syntax to use near ''P1','P4','P6','P7','P9','HLA-DRB13'))' at line 1 Some one knows where is the error? Thanks Pau -- Pau Marc Muñoz Torres Laboratori de Biologia Computacional Institut de Bio

Re: About FASTA file

ant to check: > > the BioPerl project @ http://www.bioperl.org/wiki/Main_Page > the BioPerl mailing list @ > http://lists.open-bio.org/mailman/listinfo/bioperl-l > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] >

Non-deprecated way to capture array length

s)? Thanks. -- Marc Sacks, Ed.D. | Quality Assurance Manager Lextranet | 107 Union Wharf | Boston, MA 02109 http://www.lextranet.com (617) 227-4469 Extension 228 [EMAIL PROTECTED] THE INFORMATION IN THIS MESSAGE IS INTENDED ONLY FOR THE PERSONAL AND CONFIDENTIAL USE OF THE DESIGNATED RECIPIENTS N

Re: Standard input errors

dress" and has no idea what to with the /n. Then, it sees the following text string: "; my $address $name =<>; print " It probably takes this as a scalar and has no idea how to process it; and after that, it gets some more funny text followed by another unresolved dou

Re: perl scalar

I guess I didn't quite use the original code. I made the mistake of typing what it should have been instead of what it was: #!/usr/bin/perl $street="Wright"; print "$street\n"; $street="Washington"; It's amazing what a dollar sign and a change of case

Re: perl scalar

Odd. I just tried the same code snippet and it worked fine. You might try putting a space before and after your "=" signs. I don't know if that makes a difference, but it won't hurt. Marc Sacks [EMAIL PROTECTED] D. Bolliger wrote: elite elite am Montag, 25. September 2

Re: Perl Newbie - Need good book recommendation

efore going for the book) assume a certain level of familiarity with basic programming concepts which I didn't have. -- Sat, 27 Sep 2003 16:17:00 -1000 Linux 2.4.20-20.9 Mutt 1.4.1i (2003-03-19) A legion of French Bosoms could not match the lucid beauty of your toenails! -- the sur

Re: Perl Vs ...

\t$&."'!#+sexisexiixesixeseg;y~\n~~;eval What's all that? -- Sun, 21 Sep 2003 21:12:00 -1000 Linux 2.4.20-20.9 Mutt 1.4.1i (2003-03-19) Fear not the earl lest I had conquered him and peopled else this isle with Calibans. -- the surreal compliment generator Marc Adler -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

trailing white space

file string item1 string item2 string item3 I think what his happening is when the items are read in lots of white space is attached to the end of the string. Is there a way to remove only trailing white space, from a string, but retain white spaces with in the string? thanks, Marc Marc Fromm

Using HTTP and LWP

'no_auth' => '1', 'submit_login'=>'Login', ], ); Can someone says me what means "no_auth" ?? Thanks a lot Marc __

RE: Perl Cookbook

e.net/pleac_perl Furthermore i must say that buying the cookbook is well worth your money, it's a great and very useful book.. Goodluck, Marc... | Hi Folks, | | I've just worked my way though the learning perl (lama book) 3rd edition and | I must say I found it very good, and after lurk

Ok- real dumb question

I am supposed to parse a text file such as this- 781457 Hartanto Victor Setiawan <[EMAIL PROTECTED]> 777557 Hatfield Benjamin <[EMAIL PROTECTED]> 779777 Henry James <[EMAIL PROTECTED]> 777947 Hergert Michael William <[EMAIL PROTECTED]> 778097 Iverson Jennifer Marsee <[EMAIL PROTECTED]> As yo

RE: case

WITCH; } if (/orange/) { ... last SWITCH; } } Hope this helps, Marc... | Hi, | | there is in Perl a statement "case" like in "C" or in "Pascal" ??? | | Walter -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Multiple lines - I must be doing something wrong

helps; Thanks Marc Morrison --- Michael Kelly <[EMAIL PROTECTED]> wrote: > On 2/23/02 3:52 PM, Marc Morrison > <[EMAIL PROTECTED]> wrote: > > > I have an online form that has a "Comments" field. > I > > need to extract ALL of the information from the

Multiple lines - I must be doing something wrong

I have an online form that has a "Comments" field. I need to extract ALL of the information from the comments field. Each "Comments" line begins with Comment: so the /^Comments/ works to match that, however the user may, or may not enter a new line in their comments and they may or may not sta

Extracting Multiple Lines

I have an online form that has a "Comments" field. I need to extract ALL of the information from the comments field. Each "Comments" line begins with Comment: so the /^Comments/ works to match that, however the user may, or may not enter a new line in their comments and they may or may not sta

Trying to extract an email address

Hi all, I am a newbie and really enjoy this list. I have what i am sure is a fairly easy question, but I need help. I have a text file which contains much un-needed data, but also contains a bunch of email addresses I need. I have been succesful in the basics of opening the file and putting th

installation under aix

I have installed perl 5.6.1 under aix via an lpp from the Bull distribution. The config.sh file indicates that CC='cc_r' but there is no such file. If I create a link from /usr/local/bin/gcc the make runs but it bombs with compiler errors. Does anyone know: a) if aix requires perl to be compiled

which mailing list?

I was using CPAN on aix433 with perl5.6 and was installing MD5 when I got this error make:cc_r: Command not found make: *** [MD5.o] Error 127 To which of the dozens of perl lists should I post to find out what happened? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e

Re: Newbie: Move to next entry

> I have delimited the fields in the logfile by ","..and delimited the > last field for each entry with a "*". > > How do I get it to move to the next entry after the *, and print that to > screen? > > open(READFILE, $log_file) || > > print "The log file could not be opened",$BR; > > while() > > {