Dictionary

Hi folks, Trying to make learning of German adjectives easier for me ( and to learn Perl, of course :-) ) I've decided to create a small dictionary in Perl.. Is using a hash of lists a good approach to solve the problem? - I've created several fairly small dictionary files - each line in them lo

Perl backward compatibility question

Hi folks, Inspired by some discussion on that list I'd like to swap my 5.004 version of Perl to a newer one. ( To be exact, perl -v returns now on our system: This is perl, version 5.004_04 built for sun4-solaris Copyright 1987-1997, Larry Wall ) The only Perl guru that we have in our company is

AW: short filehandle question

Brilliant! Thanks, no more warnings :-) Ela > -Ursprüngliche Nachricht- > Von: Michael Fowler [mailto:[EMAIL PROTECTED]] > Gesendet: Freitag, 29. Juni 2001 19:20 > An: Ela Jarecka > Cc: Beginners list (E-Mail) > Betreff: Re: short filehandle question > > >

AW: short filehandle question

Hi, It is declared as my $FILEH at the beginning of the file... Could you tell me what the difference is? Ela > -Ursprüngliche Nachricht- > Von: Jerry Preston [mailto:[EMAIL PROTECTED]] > Gesendet: Freitag, 29. Juni 2001 15:39 > An: Ela Jarecka > Betreff: Re: short file

short filehandle question

Hi, Executing my program with -w option I get the following warning: 'Value of construct can be "0"; test with defined() at readData line 65535.' Surely I do not have 65535 lines in my program, but I suspect this one: #reading data open (FILEH, $filename) or die "Can't open file!\n"; while ($l

die / exit / style question

Hi folks, I have a couple of doubts/questions about the usage of above functions: 1. will those three always work the same ( I have troubles understanding the 'die' description in Llama book ( $!, $?>>8, the status of the last reaped child from a system, wait, close on a pipe, or `command`))?: i

AW: getopt:std questions

I use it like this ( checking program options ): my $usage = "$0 -s -u -b -e -f \n"; my %opts; getopts('b:e:s:u:f:', \%opts); my $servdata = $opts{s}; my $userdata = $opts{u}; my $begtime = $opts{b}; my $endtime = $opts{e}; my $reqdata = $opts{f}; Cheers, Ela > -Ursprüngliche Nachricht

Data format ( time zones )

Hi, I have to check whether a given string ( '-MM-DDTHH:MI:SSTZD' - where TZD = Z|+HH:MI|-HH:MI ) contains a valid data and then convert to '-MM-DD HH:MI:SS'. I've found a module called Net::ICal::Time, but it doesn't seem to be working properly.. Writing a regex to divide the given strin

AW: Problems with LWP::UserAgent and HTTP::Response

Thanks, at least I know that I am sending my XML properly.. But I still get the same error message, so if anyone has more suggestions please write.. Ela > -Ursprüngliche Nachricht- > Von: Tim Keefer [mailto:[EMAIL PROTECTED]] > Gesendet: Montag, 18. Juni 2001 15:46 > An:

Problems with LWP::UserAgent and HTTP::Response

Hi, I am using the following code to send and XML document ( output.xml ) to a remote server: use strict; use LWP::Debug qw(+); use LWP::UserAgent; use IO; my $resp; $resp = 'response.xml'; my $FILEH; open (FILEH, ) or die "Can't open file output.xml!\n"; my $ua = LWP::UserAgent->new; #another

[OT] AW: Beginer...Any free resources for Learning Perl

Well, I think that you are going a little bit too far with your comment.. It sounds like 'we, Americans ( US Citizens ), the good, honest guys, despise those awful, filthy thieves ( not US Citizens )'... Sorry, but I do not particularly like generalizations like that & it hurts me when I'm being

[OT] AW: Getting to the contents of a class..

ndet: Dienstag, 12. Juni 2001 14:00 > An: Ela Jarecka > Betreff: Re: Getting to the contents of a class.. > > % > > - Original Message - > From: "Ela Jarecka" <[EMAIL PROTECTED]> > To: "Beginners list (E-Mail)" <[EMAIL PROTECTED]> &g

AW: Getting to the contents of a class..

> > > > foreach my $item ( keys $reqrec->myflds ) { #line 26 > > > > ... > > > > } > > If, out of the constructor you showed us above, you're > expecting the myflds > method to automatically be created, and return your hash, > it's not going to > happen. You have to define a myflds m

AW: Getting to the contents of a class..

ans [mailto:[EMAIL PROTECTED]] > Gesendet: Montag, 11. Juni 2001 12:04 > An: Ela Jarecka > Cc: Beginners list (E-Mail) > Betreff: Re: Getting to the contents of a class.. > > > What myflds probably is (if used a 'normal' contructor > returning a hashref), is > a h

Getting to the contents of a class..

Hi, I've just defined a small class, DataReq. It contains a hash called 'myflds' and a couple of functions for writing/retrieving data. Now, in my main program, I've included the following code: my $reqrec = new DataReq; if ( ($reqrec->fillrec(@mylist)) == undef ) { die "fillrec failed!\n";

AW: Sending XML-formatted messages over a https-Connection from a Perl programm

> It all depends on what the client looks like, if they have an xml parser, > like zerces or JAXP for Enterprise java, then you both could > agree on the location of the xml, and you'd post it and the xml parser > would grab it. > Otherwise, you could simply stream the file over a regular > soc

Sending XML-formatted messages over a https-Connection from a Perl programm

Hi, Could anybody help me in that subject? I am supposed to send an XML-formatted message requesting data from a third-party system.. Where should I start? Where do I find a Perl module supporting http streams? Thanks in advance, Ela