[29555] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 799 Volume: 11

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 27 14:09:43 2007

Date: Mon, 27 Aug 2007 11:09:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Mon, 27 Aug 2007     Volume: 11 Number: 799

Today's topics:
        2 issues with "tie" <tuctboh@gmail.com>
    Re: 2 issues with "tie" <ced@blv-sam-01.ca.boeing.com>
    Re: best practice ... requires <hillmw@charter.net>
    Re: best practice ... requires <noreply@gunnar.cc>
    Re: great and better hash eval <john.swilting@wanadoo.fr>
        How to make this case insenstive <daniel.crosby@freenet.de>
    Re: How to make this case insenstive <sisyphus1@nomail.afraid.org>
    Re: How to make this case insenstive <tony_curtis32@yahoo.com>
    Re: How to make this case insenstive <simon.chao@fmr.com>
    Re: How to make this case insenstive <jurgenex@hotmail.com>
    Re: How to make this case insenstive <simon.chao@fmr.com>
        Logging onto a Website <kassebaumj@hotmail.com>
    Re: Logging onto a Website  usenet@DavidFilmer.com
        Most Appropriate Data Structure/Method <kc9ddi@arrl.net>
    Re: Most Appropriate Data Structure/Method <simon.chao@fmr.com>
    Re: Most Appropriate Data Structure/Method <jurgenex@hotmail.com>
    Re: Most Appropriate Data Structure/Method <jurgenex@hotmail.com>
    Re: Most Appropriate Data Structure/Method <simon.chao@fmr.com>
        new CPAN modules on Mon Aug 27 2007 (Randal Schwartz)
        Perl file server <lgt@invalid.com>
    Re: push into hashs of arrays <jiehuang001@gmail.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Mon, 27 Aug 2007 01:32:41 -0000
From:  Tuc <tuctboh@gmail.com>
Subject: 2 issues with "tie"
Message-Id: <1188178361.063606.61710@k79g2000hse.googlegroups.com>

Hi,

I seem to be running into some issues with tie in perl 5.8.8 with the
defined-or patch from the FreeBSD ports.

I use :
use NDBM_File;
use Fcntl;

I open up my file as :
tie (%fdb,'NDBM_File',"file.victims",O_RDWR|O_CREAT,0777) ||die $!;

I write to it as
$fdb{$_}="TUC";

I close it as :
untie %fdb;

Seems pretty basic. But I've got 2 issues.

1) If $_="Fred", and the program iterates and does
$fdb{'Fred'}="TUC"; , if I immediately start another program up to
read "Fred" from the file, it claims it doesn't exist. As if it hasn't
sync'd. As soon as I do the "untie %fdb;", then the data becomes
available. Is there a way that as soon as I $fdb{'Fred'}="TUC";  it
becomes accessible?

2) I also have the issue that if I'm running my program, and I hit
CNTRL-C to stop it, none of the values I've $fdb{$_}="TUC"; end up
getting and staying set. So the next time the program runs, and checks
to see if its already in the data store, it says its not and re-
executes the command. Is there some way that once its set its
"committed" per se?

Thanks, Tuc



------------------------------

Date: Mon, 27 Aug 2007 09:57:33 -0700
From:  "comp.llang.perl.moderated" <ced@blv-sam-01.ca.boeing.com>
Subject: Re: 2 issues with "tie"
Message-Id: <1188233853.996814.175520@l22g2000prc.googlegroups.com>

On Aug 26, 6:32 pm, Tuc <tuct...@gmail.com> wrote:

> I seem to be running into some issues with tie in perl 5.8.8 with the
> defined-or patch from the FreeBSD ports.
>
> I use :
> use NDBM_File;
> use Fcntl;
>
> I open up my file as :
> tie (%fdb,'NDBM_File',"file.victims",O_RDWR|O_CREAT,0777) ||die $!;
>
> I write to it as
> $fdb{$_}="TUC";
>
> I close it as :
> untie %fdb;
>
> Seems pretty basic. But I've got 2 issues.
>
> 1) If $_="Fred", and the program iterates and does
> $fdb{'Fred'}="TUC"; , if I immediately start another program up to
> read "Fred" from the file, it claims it doesn't exist. As if it hasn't
> sync'd. As soon as I do the "untie %fdb;", then the data becomes
> available. Is there a way that as soon as I $fdb{'Fred'}="TUC";  it
> becomes accessible?

NDBM doesn't appear to have a 'sync' method to
force a flush to disk. I don't know if there's
a convenient workaround so, alternatively, you
may want to consider using DB_File which does
provide a 'sync'.

DB_File also has other advantages and doesn't
have have NDBM's key,value length max.

>
> 2) I also have the issue that if I'm running my program, and I hit
> CNTRL-C to stop it, none of the values I've $fdb{$_}="TUC"; end up
> getting and staying set. So the next time the program runs, and checks
> to see if its already in the data store, it says its not and re-
> executes the command. Is there some way that once its set its
> "committed" per se?
>

You could set up an signal handler to catch
the interrupt and untie, eg.,

$SIG{INT} = sub { untie %fdb; };

--
Charles DeRykus



------------------------------

Date: Mon, 27 Aug 2007 07:43:10 -0700
From:  mike <hillmw@charter.net>
Subject: Re: best practice ... requires
Message-Id: <1188225790.402768.109460@w3g2000hsg.googlegroups.com>

So if I have some parameters to pass to the subroutine how do I do
that without a prototype?

Mike



------------------------------

Date: Mon, 27 Aug 2007 17:14:53 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: best practice ... requires
Message-Id: <5jg83gF3stngmU1@mid.individual.net>

mike wrote:
> So if I have some parameters to pass to the subroutine how do I do
> that without a prototype?

You just pass them...

     perldoc perlsub

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: Mon, 27 Aug 2007 12:00:32 +0200
From: john swilting <john.swilting@wanadoo.fr>
Subject: Re: great and better hash eval
Message-Id: <46d2a0c2$0$27373$ba4acef3@news.orange.fr>

Michele Dondi wrote:

> On Sun, 26 Aug 2007 01:26:42 +0200, john swilting
> <john.swilting@wanadoo.fr> wrote:
> 
>>I do not understand .i start the deboguor ,is the file test.dat is well
>>execute.in the file main.pl the loop while does not seem to function
>>correctly. one only value is returned to me before keys. it appears
>>infinite
> 
> http://en.wikipedia.org/wiki/Darmok
> 
> 
> Michele
tirare la maniglia e arribaltare il copperchio


------------------------------

Date: Mon, 27 Aug 2007 06:44:41 -0700
From:  Daniel <daniel.crosby@freenet.de>
Subject: How to make this case insenstive
Message-Id: <1188222281.206237.216560@k79g2000hse.googlegroups.com>

I am checking to see if the name is the same name as in $row[1] but
should be case insensitive.

my $line = DBI::neat_list(\@row, 70, ',');
                if ($name ne $row[1])
                do
                    error message

 ...
 .

Is this possible?

Thank you!



------------------------------

Date: Mon, 27 Aug 2007 23:58:11 +1000
From: "Sisyphus" <sisyphus1@nomail.afraid.org>
Subject: Re: How to make this case insenstive
Message-Id: <46d2d879$0$15142$afc38c87@news.optusnet.com.au>


"Daniel" <daniel.crosby@freenet.de> wrote in message 
news:1188222281.206237.216560@k79g2000hse.googlegroups.com...
>I am checking to see if the name is the same name as in $row[1] but
> should be case insensitive.
>
> my $line = DBI::neat_list(\@row, 70, ',');
>                if ($name ne $row[1])
>                do
>                    error message

 my $line = DBI::neat_list(\@row, 70, ',');
                if (lc($name) ne lc($row[1]))
                do
                    error message

Cheers,
Rob



------------------------------

Date: Mon, 27 Aug 2007 09:50:49 -0400
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: How to make this case insenstive
Message-Id: <faukrp$a5i$1@knot.queensu.ca>

Daniel wrote:
> I am checking to see if the name is the same name as in $row[1] but
> should be case insensitive.
> 
> my $line = DBI::neat_list(\@row, 70, ',');
>                 if ($name ne $row[1])
>                 do
>                     error message

That's easy, canonicalize both of them: e.g. lc() or uc(), q.v.

hth
t


------------------------------

Date: Mon, 27 Aug 2007 15:29:19 -0000
From:  it_says_BALLS_on_your forehead <simon.chao@fmr.com>
Subject: Re: How to make this case insenstive
Message-Id: <1188228559.125767.298950@o80g2000hse.googlegroups.com>

On Aug 27, 9:44 am, Daniel <daniel.cro...@freenet.de> wrote:
> I am checking to see if the name is the same name as in $row[1] but
> should be case insensitive.
>
> my $line = DBI::neat_list(\@row, 70, ',');
>                 if ($name ne $row[1])
>                 do
>                     error message
>
> ...
> .
>

an alternative to the lc() or uc() solution is to use a regex
(although this is probably less efficient).

if ( $name =~ m/$row[1]/i ) {
    do {
        blah



------------------------------

Date: Mon, 27 Aug 2007 15:42:49 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: How to make this case insenstive
Message-Id: <ZhCAi.3556$Ah3.2879@trndny04>

Daniel wrote:
> I am checking to see if the name is the same name as in $row[1] but
> should be case insensitive.
>
> my $line = DBI::neat_list(\@row, 70, ',');
>                if ($name ne $row[1])

> Is this possible?

Use normal forms, i.e. convert both to all lower or all upper case:
    if (lc($name) ne lc($row[1])) {
If you loop through @row again and again it might be faster to store the 
text in normal form.

Or you can use pattern matching with the /i option, but you need to be 
careful to anchor the pattern at both ends and to block RE special 
characters from being interpreted as such.

jue 




------------------------------

Date: Mon, 27 Aug 2007 15:46:19 -0000
From:  it_says_BALLS_on_your forehead <simon.chao@fmr.com>
Subject: Re: How to make this case insenstive
Message-Id: <1188229579.356455.316200@22g2000hsm.googlegroups.com>

On Aug 27, 11:42 am, "J=FCrgen Exner" <jurge...@hotmail.com> wrote:
> Daniel wrote:
> > I am checking to see if the name is the same name as in $row[1] but
> > should be case insensitive.
>
> > my $line =3D DBI::neat_list(\@row, 70, ',');
> >                if ($name ne $row[1])
> > Is this possible?
>
> Use normal forms, i.e. convert both to all lower or all upper case:
>     if (lc($name) ne lc($row[1])) {
> If you loop through @row again and again it might be faster to store the
> text in normal form.
>
> Or you can use pattern matching with the /i option, but you need to be
> careful to anchor the pattern at both ends and to block RE special
> characters from being interpreted as such.

gah! i was thinking about anchoring, but completely forgot to include
them in my post. thanks jue. i forgot about the escapes too, so double
thanks.



------------------------------

Date: Sun, 26 Aug 2007 21:03:00 -0700
From:  RevKass <kassebaumj@hotmail.com>
Subject: Logging onto a Website
Message-Id: <1188187380.836873.84530@r34g2000hsd.googlegroups.com>

How do I log onto a secure website, like optionsxpress.com?



------------------------------

Date: Mon, 27 Aug 2007 04:10:57 -0000
From:  usenet@DavidFilmer.com
Subject: Re: Logging onto a Website
Message-Id: <1188187857.116904.61480@i38g2000prf.googlegroups.com>

On Aug 26, 9:03 pm, RevKass <kasseba...@hotmail.com> wrote:
> How do I log onto a secure website, like optionsxpress.com?

I recommend https protocol for logging onto a secure website.


--
The best way to get a good answer is to ask a good question.
David Filmer (http://DavidFilmer.com)



------------------------------

Date: Mon, 27 Aug 2007 12:44:26 -0400
From: Pat McDonnell <kc9ddi@arrl.net>
Subject: Most Appropriate Data Structure/Method
Message-Id: <46d2f35e$0$7328$88260bb3@free.teranews.com>

Hello -

I'm working on a script in which the user provides a path, and the script
does something based on that path.  I want to develop some type of
association between paths, and actions to perform.  For instance, take the
following:

        Path            Action
        ----------------------
        /home        &home()
        /home/luser  &luser()
        /home/luser/abc  &luserabc();

So, if the user passes /home/luser, &luser would be executed.  If the user
passes /home/luser/xyz, &luser would still be executed, as it is the most
specific match for that path.  If /home/anotheruser is passed, &home would
be executed, as that is the most specific match.  Does this make sense?

So, my question is, is there any type of data structure/module that is best
for this?  I could hack something together with regex's and loops easily
enough, but I was hoping there would be something "cleaner."  I've looked
at a trie, but that seems to be the opposite of what I want.  Thanks.

-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: Mon, 27 Aug 2007 16:48:31 -0000
From:  it_says_BALLS_on_your forehead <simon.chao@fmr.com>
Subject: Re: Most Appropriate Data Structure/Method
Message-Id: <1188233311.292410.244140@g4g2000hsf.googlegroups.com>

On Aug 27, 12:44 pm, Pat McDonnell <kc9...@arrl.net> wrote:
> Hello -
>
> I'm working on a script in which the user provides a path, and the script
> does something based on that path.  I want to develop some type of
> association between paths, and actions to perform.  For instance, take the
> following:
>
>         Path            Action
>         ----------------------
>         /home        &home()
>         /home/luser  &luser()
>         /home/luser/abc  &luserabc();
>
> So, if the user passes /home/luser, &luser would be executed.  If the user
> passes /home/luser/xyz, &luser would still be executed, as it is the most
> specific match for that path.  If /home/anotheruser is passed, &home would
> be executed, as that is the most specific match.  Does this make sense?
>
> So, my question is, is there any type of data structure/module that is best
> for this?  I could hack something together with regex's and loops easily
> enough, but I was hoping there would be something "cleaner."  I've looked
> at a trie, but that seems to be the opposite of what I want.  Thanks.
>

you are looking for a dispatch table. essentially, you can map a key
(in this case, a string describing a path) to a value (a subroutine
reference) via a hash.



------------------------------

Date: Mon, 27 Aug 2007 16:49:24 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: Most Appropriate Data Structure/Method
Message-Id: <ogDAi.3562$Ah3.230@trndny04>

Pat McDonnell wrote:
> Hello -
>
> I'm working on a script in which the user provides a path, and the
> script does something based on that path.  I want to develop some
> type of association between paths, and actions to perform.  For
> instance, take the following:
>
>        Path            Action
>        ----------------------
>        /home        &home()
>        /home/luser  &luser()
>        /home/luser/abc  &luserabc();
>
> So, if the user passes /home/luser, &luser would be executed.  If the
> user passes /home/luser/xyz, &luser would still be executed, as it is
> the most specific match for that path.  If /home/anotheruser is
> passed, &home would be executed, as that is the most specific match.
> Does this make sense?
>
> So, my question is, is there any type of data structure/module that
> is best for this?  I could hack something together with regex's and
> loops easily enough, but I was hoping there would be something
> "cleaner."  I've looked at a trie, but that seems to be the opposite
> of what I want.

I would use a hash with a classic dispatch table.
And then iterate over the path, in each iteration chopping of the trailing 
end of the path, until I find a matching key in the table.

jue 




------------------------------

Date: Mon, 27 Aug 2007 17:10:25 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: Most Appropriate Data Structure/Method
Message-Id: <5ADAi.3565$Ah3.3197@trndny04>

it_says_BALLS_on_your forehead wrote:
> On Aug 27, 12:44 pm, Pat McDonnell <kc9...@arrl.net> wrote:
>>         Path            Action
>>         ----------------------
>>         /home        &home()
>>         /home/luser  &luser()
>>         /home/luser/abc  &luserabc();
>>
>> So, if the user passes /home/luser, &luser would be executed.  If
>> the user passes /home/luser/xyz, &luser would still be executed, as
>> it is the most specific match for that path.  If /home/anotheruser
>> is passed, &home would be executed, as that is the most specific
>> match.
>
> you are looking for a dispatch table. essentially, you can map a key
> (in this case, a string describing a path) to a value (a subroutine
> reference) via a hash.

Yes, but with a twist: a normal hash doesn't provide the "most specific 
match" functionality

jue 




------------------------------

Date: Mon, 27 Aug 2007 17:15:47 -0000
From:  it_says_BALLS_on_your forehead <simon.chao@fmr.com>
Subject: Re: Most Appropriate Data Structure/Method
Message-Id: <1188234947.634109.145610@50g2000hsm.googlegroups.com>

On Aug 27, 1:10 pm, "J=FCrgen Exner" <jurge...@hotmail.com> wrote:
> it_says_BALLS_on_your forehead wrote:
> > On Aug 27, 12:44 pm, Pat McDonnell <kc9...@arrl.net> wrote:
> >>         Path            Action
> >>         ----------------------
> >>         /home        &home()
> >>         /home/luser  &luser()
> >>         /home/luser/abc  &luserabc();
>
> >> So, if the user passes /home/luser, &luser would be executed.  If
> >> the user passes /home/luser/xyz, &luser would still be executed, as
> >> it is the most specific match for that path.  If /home/anotheruser
> >> is passed, &home would be executed, as that is the most specific
> >> match.
>
> > you are looking for a dispatch table. essentially, you can map a key
> > (in this case, a string describing a path) to a value (a subroutine
> > reference) via a hash.
>
> Yes, but with a twist: a normal hash doesn't provide the "most specific
> match" functionality

ahh, i hadn't read the OP's post thoroughly enough. man, i'm just off
today...



------------------------------

Date: Mon, 27 Aug 2007 04:42:16 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Mon Aug 27 2007
Message-Id: <JnF12G.F2C@zorch.sf-bay.org>

The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN).  You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.

Bot-Pastebot-0.52
http://search.cpan.org/~rcaputo/Bot-Pastebot-0.52/
----
Bundle-Perl-Critic-1.00
http://search.cpan.org/~elliotjs/Bundle-Perl-Critic-1.00/
A CPAN bundle for Perl::Critic and related modules 
----
CGI-Ex-Recipes-0.04
http://search.cpan.org/~berov/CGI-Ex-Recipes-0.04/
A usage example for CGI::Ex::App! 
----
Class-Data-Annotated-0.2
http://search.cpan.org/~zaphar/Class-Data-Annotated-0.2/
Data::Annotated wrapped objects 
----
Data-Annotated-0.2
http://search.cpan.org/~zaphar/Data-Annotated-0.2/
Data structure Annotation module 
----
Devel-PerlySense-0.01_02
http://search.cpan.org/~johanl/Devel-PerlySense-0.01_02/
IntelliSense for Perl 
----
File-FcntlLock-0.09
http://search.cpan.org/~jtt/File-FcntlLock-0.09/
File locking with fcntl(2) 
----
GD-Barcode-Image-1.03
http://search.cpan.org/~avinash/GD-Barcode-Image-1.03/
Create Image::Magick object for a barcode 
----
Games-RolePlay-MapGen-1.0.2
http://search.cpan.org/~jettero/Games-RolePlay-MapGen-1.0.2/
The base object for generating dungeons and maps 
----
HTML-DOM-0.005
http://search.cpan.org/~sprout/HTML-DOM-0.005/
A Perl implementation of the HTML Document Object Model 
----
HTML-ParagraphSplit-0.04
http://search.cpan.org/~hanenkamp/HTML-ParagraphSplit-0.04/
Change text containing HTML into a formatted HTML fragment 
----
Net-Flickr-Geo-0.4
http://search.cpan.org/~ascope/Net-Flickr-Geo-0.4/
tools for working with geotagged Flickr photos 
----
OCR-Naive-0.04
http://search.cpan.org/~karasik/OCR-Naive-0.04/
convert images into text in a extremely naive fashion 
----
Ogre-0.1
http://search.cpan.org/~slanning/Ogre-0.1/
Perl binding for the OGRE C++ graphics library 
----
POE-Component-Client-SMTP-0.18
http://search.cpan.org/~ultradm/POE-Component-Client-SMTP-0.18/
Asynchronous mail sending with POE 
----
TAP-Parser-0.54
http://search.cpan.org/~andya/TAP-Parser-0.54/
Parse TAP output 
----
Talk-NothingIsFaster510-0.02
http://search.cpan.org/~avar/Talk-NothingIsFaster510-0.02/
----
Test-Harness-2.65_02
http://search.cpan.org/~petdance/Test-Harness-2.65_02/
Run Perl standard test scripts with statistics 
----
XML-TreePP-0.29
http://search.cpan.org/~kawasaki/XML-TreePP-0.29/
Pure Perl implementation for parsing/writing xml files 
----
libnet-1.22
http://search.cpan.org/~gbarr/libnet-1.22/
----
v6-0.020
http://search.cpan.org/~fglock/v6-0.020/
An experimental Perl 6 implementation 


If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.

This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
  http://www.stonehenge.com/merlyn/LinuxMag/col82.html

print "Just another Perl hacker," # the original

--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!


------------------------------

Date: Mon, 27 Aug 2007 11:49:19 +0300
From: lg <lgt@invalid.com>
Subject: Perl file server
Message-Id: <rh35d3h5v9fuflp3va5g01heuatnml4kb2@4ax.com>

I want to create a simple file server on my web page.

The goal is to create a way to download a newletter text file for my computer
program users (win32) with least amount of hassle for the user. The optimum would
be if all could be done in the background without any dialogs - just like many
commercial programs to nowadays.

I am thinking at my program would open make open a
www.mysite.com/perlselverl.pl&userdata which would initiate a file download
without any "Do you want to download a file" dialog popping up.



------------------------------

Date: Mon, 27 Aug 2007 08:11:31 -0700
From:  Jie <jiehuang001@gmail.com>
Subject: Re: push into hashs of arrays
Message-Id: <1188227491.055867.173840@22g2000hsm.googlegroups.com>


Thank you, Klaus!!

On Aug 24, 1:33 pm, Klaus <klau...@gmail.com> wrote:
> On Aug 24, 8:00 pm, Jie <jiehuang...@gmail.com> wrote:
>
> > I have a STUDENT_CLASS_FILE like below, basically a two column table
> > student1 class_A
> > student2 class_A
> > student3 class_B
> > ....
>
> > now if someone gives me a class list, how I could generate the student
> > lists for each class?
>
> Could be homework, but I'll give you the benefit of the doubt.
>
> > I thought that I could use a code like below, but I don't know exactly
> > what to write for the third row...
>
> ...of your perl program ?
>
> Ok, but then you'd probably better say the third *line*.
>
> > while (STUDENT_CLASS_FILE) {
>
> What is "STUDENT_CLASS_FILE" ? If it is a file handle, you probably
> want to say while (<STUDENT_CLASS_FILE>) instead. And, if I may drop a
> suggestion here, it is generally recommended to use lexical file
> handles like so:
>
> open my $STUDENT_CLASS_FILE, '<', 'data.txt' or die "Error $!";
> while (<$STUDENT_CLASS_FILE>) {
>
> >  ($student, $class) = split
>
> you are missing the parameters for split (see perldoc -f split) and
> the semicolon at the end of the line.
>
> >  push @{$STUDENT_CLASS_HASH{$class}} ,$student ????????????
>
> remove the question marks and put a semicolon at the end of the line.
>
> > }
>
> > foreach $class (@CLASS_LIST) {
> >  $students = join ("," @{$STUDENT_CLASS_HASH{$class}} )
>
> semicolon at the end of the line is
> missing.......................................
>
> >  print "$classs, $student\n"
> > }
>
> --
> Klaus




------------------------------

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc.  For subscription or unsubscription requests, send
#the single line:
#
#	subscribe perl-users
#or:
#	unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.  

NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice. 

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.

#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V11 Issue 799
**************************************


home help back first fref pref prev next nref lref last post