Today around 4:07pm, John Porter hammered out this masterpiece:
: Casey R. Tweten wrote:
: >
: > Removing intermediate data structures is easy in Perl, but not this case,
:
: C<each>, etc. must have data structures to work on. There's no "getting rid"
: of them.
Perl can create them for me.
: "I want find /usr to search the directory tree, but, um, I don't want to
: actually *have* a directory tree..."
*sigh* I like that example.
: > Especially since it's not documented.
:
: Oh, it is. The documentation of C<each>, C<keys>, and C<values> all state
: clearly that they operate on HASH variables. And perldata and perlref
: clearly describe how to make a HASH variable on the fly.
True.
: { foo => bar } # create a HASH, getting a ref to it.
:
: %{ ... } # dereference a HASH ref
Indeed, how intuitive.
Today around 1:51pm, Tom Christiansen hammered out this masterpiece:
:
: I've decided I don't believe you, because despite having taught a
: zillion people Perl, I have never *once* seen the misexpectation
: and subsequent error that you're spending so much time complaining
: about.
I think I use Perl differently that many other people, when it comes to this. I
don't consider my uses wrong, and I'd like to see them simplified. I'm content
to keep them the way they are in the face of this much adversity.
It seems that I ask the impossible. And if it's not impossible, then we become
worried about speed, but I wonder if that's what we're here to worry about
anyhow?
Today around 4:11pm, John Porter hammered out this masterpiece:
:
: Casey R. Tweten wrote:
: >
: > There is no documentation that states:
: >
: > ``keys() just doesn't work on lists and/or arrays,
:
: Why should it bother saying that, when it already says keys() works on a HASH?
:
: Or is there some confusion that a HASH might also be an ARRAY or a LIST?
No, there is no confusion, thanks.
Again, I must use Perl differently. I suppose I like to bend it in certain
areas more than most people.
Ho hum... I'm done with this battle.
--
print(join(' ', qw(Casey R. Tweten)));my $sig={mail=>'[EMAIL PROTECTED]',site=>
'http://home.kiski.net/~crt'};print "\n",'.'x(length($sig->{site})+6),"\n";
print map{$_.': '.$sig->{$_}."\n"}sort{$sig->{$a}cmp$sig->{$b}}keys%{$sig};
my $VERSION = '0.01'; #'patched' by Jerrad Pierce <belg4mit at MIT dot EDU>
