Re: cgi Calendar continued.

2007-03-09 Thread Jeff Pang
> >## To build: >my %HoH = (); >foreach my $dates (@weeks) { >foreach my $daynums (@weeks1) { >$HoH{$dates} = { > daynums => $daynums > }; >} >} > Hello, The codes above for building a hash is somewhat not correct. When you loop through @weeks1,you use {day

Re: Hi ....

2007-03-09 Thread David Moreno Garza
Neal Clark wrote: > I always thought it was an acronym, for "Pratical Extraction and > Report Language". Is that untrue, just one of those post-facto > expansions? Indeed, just as Pathologically Eclectic Rubbish Lister. -- David Moreno Garza <[EMAIL PROTECTED]> | http://www.damog.net/ Si ti

Unescaping a string escaped with Javascript

2007-03-09 Thread rluckhurst
Hi All I am updataing an application that includes a section which has a number of strings created on a WEB page and escaped with Javascript escape before being sent to a perl script. The original application had a custom unescape function however I notice that this unescape function no longer wor

cgi Calendar continued.

2007-03-09 Thread oryann9
My goal is to correlate the data in 2 arrays into a HoH or a HoA so that when I print this data in an HTML table so it comes out correctly. snippet... my (@weeks, @weeks1, @weeks_AoA,) = ((),(),()); ## Set up array with dates minus 15 days and plus 15 days from current date ## foreach $day ('

Re: Hi ....

2007-03-09 Thread Neal Clark
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 (from the link) But never write "PERL", because perl is not an acronym, apocryphal folklore and post-facto expansions notwithstanding. I always thought it was an acronym, for "Pratical Extraction and Report Language". Is that untrue, just one

Re: Hi ....

2007-03-09 Thread John W. Krahn
Chris E. Rempola wrote: > Hi All: Hello, > Just sending a test email to see if this works. I started reading the > archives & saw that this is a very friendly community. I'm a PERL http://perldoc.perl.org/perlfaq1.html#What's-the-difference-between-%22perl%22-and-%22Perl%22%3f :-) John --

Re: Loop while socket connection exists

2007-03-09 Thread Matt
What exactly are you trying to achieve? This is what I'm trying to do - and feel free to tell me I'm wasting my time if there's a better solution. Essentially what I'm trying to do is to create some kind of ftp auto-reconnect feature. I have a few machines that will drop the ftp connectio

Re: Hi ....

2007-03-09 Thread Jeff Pang
Welcome. But,would you maybe never send a test message to this list? It would trouble most of the people on this list. :) -Original Message- >From: "Chris E. Rempola" <[EMAIL PROTECTED]> >Sent: Mar 9, 2007 11:33 AM >To: beginners@perl.org >Subject: Hi > >Hi All: > >Just sending a test

Hi ....

2007-03-09 Thread Chris E. Rempola
Hi All: Just sending a test email to see if this works. I started reading the archives & saw that this is a very friendly community. I'm a PERL beginner & I've already learned some things reading the archives. Glad I found you guys! Thanks. --

Re: Loop while socket connection exists

2007-03-09 Thread Chas Owens
On 3/9/07, Matt <[EMAIL PROTECTED]> wrote: snip You're right, but does it slowdown the script much if if there are two? I only ask because I didn't think about combining them into one line - not questioning your perl know-how. snip It depends on where in the code you do it. In your case you ha

Re: URL too long

2007-03-09 Thread Eugene Kosov
Tom Smith wrote: Tatiana Lloret Iglesias wrote: Yes! that's the problem, GET method doesnt allow very very long url's ... how can I use POST from Perl code? do you have any example? GET and POST are part of XHTML, not Perl. Realy? :) I thought GET and POST are methods of HTTP protocol :) --

Re: Loop while socket connection exists

2007-03-09 Thread Matt
Jeff Pang wrote: } else { my $whileloop = 99; } Hello, There is a scope mistaken above.You declare $whileloop at the outside of the loop,while here you re-declare another $whileloop with "my".This $whileloop is different from the former one.So "my $whileloop = 99" s

Re: Loop while socket connection exists

2007-03-09 Thread Matt
I don't understand why you are using the $whileloop variable. Perl has perfectly good loop control mechanisms. A quick rewrite would be I think I used it because at first I tried while ($sock) - and that didn't work. So I just used something I 'knew' would always hold true. while (1) {

Algoritm of playing audio files

2007-03-09 Thread Monomachus
I need to make a player which should play various formats of files including : .MP3, .AVI, .WAV, .MIDI... What Algoritm is the best for playing these files & please help with some examples or name of books where I could read this information. I saw a lot of modules with mp3, wav, etc. on CPAN.

Re: Loop while socket connection exists

2007-03-09 Thread Steve Bertrand
I don't understand why you are using the $whileloop variable. Perl has perfectly good loop control mechanisms. A quick rewrite would be while (1) { if ($sock) { printf "Socket connected\n"; printf "$counter\n"; $counter++; sleep

Re: Query on pattern matching

2007-03-09 Thread Rob Dixon
Dharshana Eswaran wrote: On 3/9/07, John W. Krahn <[EMAIL PROTECTED]> wrote: Chas Owens wrote: [snip] ( \w+ | \d+ | 0x[a-fA-F0-9] That only matches a single hexadecimal digit, you probably want 0x[a-fA-F0-9

Re: Where can I get the Perl library modules

2007-03-09 Thread Peter Scott
On Tue, 06 Mar 2007 10:29:36 -0800, Michael Goopta wrote: > I am very new to perl. I could download perl.exe for my PC. But > I do not have the library modules, such as time.pm etc. For reference, you have many modules (in the core), but not some that you want. > For this reason, when I use any

Re: private method

2007-03-09 Thread Peter Scott
On Sat, 03 Mar 2007 22:23:04 -0500, Jeff Pang wrote: > Does Perl's OO have "private method" like Python and other OO languages? > When we say "sub foo { }" in a package 'bar',Perl will insert the "foo" > into this package's symbol table,so we can access foo() from anywhere > out of the package bar,