Re: perldoc -q "How can I make my Perl program run faster?"

2007-03-22 Thread oryann9
--- Chas Owens <[EMAIL PROTECTED]> wrote: > On 3/22/07, oryann9 <[EMAIL PROTECTED]> wrote: > snip > > Am I linked to libc.a? > snip > >libc=/usr/lib/libc.a, so=dll, useshrplib=true, > libperl=libperl.a > snip > > It looks like it. My perl says &

Re: perldoc -q "How can I make my Perl program run faster?"

2007-03-22 Thread oryann9
> This really isn't a Perl question, though. If you > have questions about > dynamic vs. static linking, and why you might want > to do one or the > other, you should probably pick up a good book on C > and/or the C > compiler on your system. > > HTH, > > -- jay thank you for responding, howev

Re: perldoc -q "How can I make my Perl program run faster?"

2007-03-23 Thread oryann9
--- Jay Savage <[EMAIL PROTECTED]> wrote: > On 3/22/07, oryann9 <[EMAIL PROTECTED]> wrote: > > > > > This really isn't a Perl question, though. If > you > > > have questions about > > > dynamic vs. static linking, and why you might > w

perl 5.10 questions

2007-04-03 Thread oryann9
In "The Perl Review" spring 07 page 10 it states: "With Perl 5.10 I can write my own lexical pragmas. In fact, feature was implemented this way. The %^H special variable lets me attach "references" to the optree, which I can then inspect with caller. Perl passes this information as a new item in t

Re: perl 5.10 questions

2007-04-04 Thread oryann9
> But this is all fairly complicated stuff and > probably a little advanced > for a beginners list. You might find more joy > asking on > comp.lang.perl.moderated, or perlmonks. > > -- > Paul Johnson - [EMAIL PROTECTED] yes but there are a lot of advanced members on the list. ok thanks for r

Re: Using case in Perl

2007-04-04 Thread oryann9
--- > > Perl doesn't have the "switch" control statement. > But you can get it by looking at CPAN: > http://search.cpan.org/~rgarcia/Switch-2.13/Switch.pm > To share some information in the up-incoming Perl 5.10 there will be a replacement for the switch clause. The given-when is the Perl answe

Re: Text munging problem

2007-04-06 Thread oryann9
$field =~ s/\b(.)(.*?)\b/\u$1\L$2/g; $record .= "$field|"; ** Is this regex s/\b(.)(.*?)\b/ saying boundry between any character zero or more times in $1 up to everything else non-greedy end word boundry in $2 sort of confused since your end goal is to CAPS first letter i

Re: Bandwidth Generated

2007-04-13 Thread oryann9
> > It works fine with 5.8.8 on my Fedora Core 5: > > $ perl -e 'for ("","abc\n","def","hij\n"){print; > warn tell STDOUT,"\n"}' > 0 > abc > 4 > 7 > defhij > 11 > $ > Does not seem to be accurate on this platform??? $ uname -a CYGWIN_NT-5.1 dubmdsmith10 1.5.24(0.156/4/2) 2007-01-31 10:57 i686

Re: Where Clause Help.

2007-04-18 Thread oryann9
> > I am trying to select items from a table where the > miles field is not > null or blank and the below statement does not work. > Does anyone have > any suggestions? > @resultkeys = > ("Date","People","Miles","Savings"); > > $sql = "SELECT c.objectid,c.dateadded as >

Re: reqular expr for string manip.

2007-04-20 Thread oryann9
> "Mumia W." schreef: > > > my $lang = ($topdir =~ /([^\/]+)$/)[0]; > > ITYRMSL: > > my ($lang) = $topdir =~ m~([^/]+)$~; > > -- Dr Rudd, I have never seen the expression m~ or $~ Will you tell me what this is and what is says? thank you

Re: Nested loop

2007-04-20 Thread oryann9
--- Chas Owens <[EMAIL PROTECTED]> wrote: > On 4/19/07, John W. Krahn <[EMAIL PROTECTED]> wrote: > > Chas Owens wrote: > > > Yes, foreach was aliased to for for backwards > compatibility, > > > > Huh? Do you have something to back up that claim? > > Well, perlsyn* says >The "foreach" key

Re: Nested loop

2007-04-20 Thread oryann9
--- Chas Owens <[EMAIL PROTECTED]> wrote: > On 4/20/07, John W. Krahn <[EMAIL PROTECTED]> wrote: > snip > > You are omitting one critical argument. For > people who are stuck with older > > versions of Perl and in your grep() example above > the foreach expression > > creates its list in memory w

unit messages

2007-04-30 Thread oryann9
Please advise on the small amount of code b/c I am getting the message as below, but the code is working and output how I want it, just trying to rid of messages. thank you! Use of uninitialized value in concatenation (.) or string at JFS_version_parser.pl line 20, line 952 (#1) Use of uniniti

Re: unit messages

2007-05-01 Thread oryann9
> #!/usr/bin/perl > > use strict; > use warnings; > > my @a = qw(abc def ghi); > > for my $s (@a) { > $s =~ /(b)|(e)|(h)/; > print "1 => [$1] 2 => [$2] 3 => [$3]\n"; > } > Thank you for the kind replies. I understand now and have modified the code to: use strict; use warnings

Re: unit messages

2007-05-01 Thread oryann9
> > Why are you creating these regexes so far from > where > > they are used? > > If you are going to do this at least give them > > meaningful names. I dont have a good reason Chas other than I like the ability to easily change the variable in one spot in case of future use. If this is not a goo

<    1   2