Re: Reference name

On Mar 15, Peter Rabbitson said: ... I'll get it some day. As far as dereferencing with ->, which I asked earlier but I never got an answer to. For example are $sources{${$batch_ref}{by_method}}{card_def} and $sources->($batch_ref->by_method)->card_def No, not at all. $sources{${$batch_ref}{by_me

Re: Reference name

> And once again, you've written some round-about referencing code: ... I'll get it some day. As far as dereferencing with ->, which I asked earlier but I never got an answer to. For example are $sources{${$batch_ref}{by_method}}{card_def} and $sources->($batch_ref->by_method)->card_def equi

Re: Reference name

On Mar 14, Peter Rabbitson said: sub sub_call { my ($hashref, $object) = @_; print "Now working on $object using values\n"; foreach my $key (keys %{${$hahsref}{$object}}) { print "$key\n"; } } Simple enough right? What I was asking is how can I get th

Re: arrays

On Mon, 14 Mar 2005 03:50:19 +0100, John Doe <[EMAIL PROTECTED]> wrote: > Am Montag, 14. März 2005 03.30 schrieb Grant: > > > > Thanks guys, I've almost got it. I need to save the title and URL of > > > > each result in the array to a different "scratch" variable so I can > > > > use it outside of

Re: Reference name

On Mon, Mar 14, 2005 at 05:32:01PM -0800, Tim Johnson wrote: > > Did you try enumerating the keys of %hash? > > foreach my $outerKey(sort keys %hash){ >print "$outerKey\n"; >foreach my $innerKey(sort keys %{$hash{$outerKey}}){ > print "\t$innerKey\n"; >} > } I guess I have to e

RE: Reference name

Did you try enumerating the keys of %hash? foreach my $outerKey(sort keys %hash){ print "$outerKey\n"; foreach my $innerKey(sort keys %{$hash{$outerKey}}){ print "\t$innerKey\n"; } } -Original Message- From: Peter Rabbitson [mailto:[EMAIL PROTECTED] Sent: Monday, Mar

Reference name

The answer to this question is probably beyond trivial but I can't figure it out. Say we have the following situation: my %hash = ( abcd => { a1 => 1, a2 => 2, a3 => 3 } ); another_nasty_sub (\%{$hash{abcd}}); How can I access the

Re: Simplify perl -e '$a = [1,2,3,4,7]; print $a->[$#{@$a}]'

This was not a home work. In a real script I need to change the last element of the array. Not changing the array it self. I work with Perl for more than 4 years now. And after 4 years, I need this. Thanks MArcos On Thu, 10 Mar 2005 09:06:52 -0600, Larsen, Errin M HMMA/IT <[EMAIL PROTECTED]> wr

z/OS unicode error.

I am running perl 5.8.6 on z/OS unix. I am doing these : $u = unpack"U0U", "\x8a\x73"; print "\n\$u : $u"; $p = pack("U0U", $u); print "\n\$p : $p"; Are you running with strict and warnings turned on? Because I'm getting "Malformed UTF-8 character" messages running this: #!/usr/bin/perl use stric

Re: :API2 - text over a rectangle

Jay Savage wrote: Also, try calling ->gfx with a positive value, which should cause it to prepend and possibly render first. This was the issue. Replacing: my $blue_box = $page->gfx; with: my $blue_box = $page->gfx(1); causes the gfx object to get rendered 1st. Thanks :) -- Daniel Kasak IT Devel

Re: :API2 - text over a rectangle

On Tue, 15 Mar 2005 08:46:49 +1100, Daniel Kasak <[EMAIL PROTECTED]> wrote: > Charles K. Clarkson wrote: > > >Daniel Kasak wrote: > >: Hi all. > >: > >: Despite making some decent progress in other areas, I'm banging my > >: head against a brick wall on something simple:

Re: Mail 2 sms module

On 14 Mar, Ramprasad A Padmanabhan wrote: > Hi all, > > Is there any module that can help me convert text or html mail to text > that can be sms-ed > I looked at the email2sms utility, but that does not provide any > includable module and doesnt work well with text & html mails. > > Thanks > R

Re: :API2 - text over a rectangle

Charles K. Clarkson wrote: Daniel Kasak wrote: : Hi all. : : Despite making some decent progress in other areas, I'm banging my : head against a brick wall on something simple: rendering text over a : solid rectange. You didn't provide enough code. Show us everything

RE: Undefined vs uninitialized vs ???

Walter A Poor Jr wrote: > This note returns to the problem I sent to Beginner's Digest on March > 3rd, and to which Errin Larsen kindly replied in > issue 2478. > > Here is a direct copy of a small part of one of the functions in a > program which worked fine for months until about two weeks ago (

Undefined vs uninitialized vs ???

This note returns to the problem I sent to Beginner's Digest on March 3rd, and to which Errin Larsen kindly replied in issue 2478. Here is a direct copy of a small part of one of the functions in a program which worked fine for months until about two weeks ago (and which has both "use strict;"

Perl and quickbooks?

Greetings, Has anybody done anything with perl and quickbooks? I simply need to export some data into quickbooks format where the user can take that exported quickbooks data and import it into quickbooks as a check. I have been looking around, but haven't found anything worthwhile. Any tips ar

Re: MySQL time

On Mon, 14 Mar 2005, Octavian Rasnita wrote: > Please tell me how can I find the time needed to pass for a perl > program execute an SQL query using MySQL, DBI and DBD::mysql. You find the time required by benchmarking the procedure. If this isn't what you mean, maybe you could clarify what you

Re: Taking Multiple Files in Pairs and Run it Iteratively

Edward Wijaya wrote: Hi, Hello, Suppose I have a pair-series of files as follows: data1.fa data1.rs data2.fa data2.rs #say each of this file contain lines of numbers #and there are 40 of files And I have a code that take two files that ends with *.fa and *.rs $ perl mycode.pl data1.fa dat

MySQL time

Hi, Please tell me how can I find the time needed to pass for a perl program execute an SQL query using MySQL, DBI and DBD::mysql. (That time shown by the mysql standard client). Thank you. Teddy -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

perl.beginners Weekly list FAQ posting

NAME beginners-faq - FAQ for the beginners mailing list 1 - Administriva 1.1 - I'm not subscribed - how do I subscribe? Send mail to <[EMAIL PROTECTED]> You can also specify your subscription email address by sending email to (assuming [EMAIL PROTECTED] is your email address):

Re: arrays

> > > > Thanks guys, I've almost got it. I need to save the title and URL of > > > > each result in the array to a different "scratch" variable so I can > > > > use it outside of the script. The following works great, but of > > > > course it only saves the last set of results from the loop. > >

RE: matching password problem

> -Original Message- > From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED] > Sent: Monday, March 14, 2005 7:44 AM > To: Jame Brooke > Cc: beginners@perl.org > Subject: Re: matching password problem > > On Mar 14, Jame Brooke said: > > > Program password.pl > > This program is rather

Re: matching password problem

On Mar 14, Jame Brooke said: Program password.pl This program is rather poorly written, and appears to have been "inspired" by some very old Perl programs lying about on your server. #!/usr/local/bin/perl #windows environment #Read in Parameter passed require "cgi-lib.pl"; &ReadParse (*input); Ew

RE: matching password problem

> -Original Message- > From: Jame Brooke [mailto:[EMAIL PROTECTED] > Sent: Monday, March 14, 2005 6:31 AM > To: beginners@perl.org > Subject: matching password problem > > [code snip] > > > Dear all, > > Can anybody help me look script above, I¡¦m > detected the script

Re: Compare 2 database queries?!

On Mon, 14 Mar 2005, SG Edwards wrote: > I have a perl script that queries a protein database (uniprot) and > puts protein data from the query into a PostgreSQL table. However, > what I would like it to do is check if the protein is in my database > already!! > > In my database I have a table

matching password problem

Program password.pl #!/usr/local/bin/perl #windows environment #Read in Parameter passed require "cgi-lib.pl"; &ReadParse (*input); $name_status =$input{'name'}; #Read User ID from HTML form $pass_status =$input{'pass'}; #Read User Password from HTML form #Open Password file sand stor

VFS_VGET(9) in perl

Is it possible in perl to get the reference to object of file system, if I have inode? Equivalent VFS_VGET(9) for example? -- Vladimir D Belousov HiTech solutions for business http://businessreklama.ru -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: :API2 - text over a rectangle

Daniel Kasak wrote: : Hi all. : : Despite making some decent progress in other areas, I'm banging my : head against a brick wall on something simple: rendering text over a : solid rectange. You didn't provide enough code. Show us everything we need to reproduce your

Compare 2 database queries?!

Hi, I have a perl script that queries a protein database (uniprot) and puts protein data from the query into a PostgreSQL table. However, what I would like it to do is check if the protein is in my database already!! In my database I have a table with a column containing all the protein_ids so I

Mail 2 sms module

Hi all, Is there any module that can help me convert text or html mail to text that can be sms-ed I looked at the email2sms utility, but that does not provide any includable module and doesnt work well with text & html mails. Thanks Ram