Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: [Perl 6] List of length 2 or...

by moritz (Cardinal)
on Oct 22, 2008 at 14:59 UTC ( [id://718772]=note: print w/replies, xml ) Need Help??


in reply to [Perl 6] List of length 2 or...

In Perl 6 a hash is list of Pair objects, so I guess your question translates to How do I turn a List into a Pair?.

In general, if you want to coerce an object of type Foo to type Bar, you call the .Bar of that object. If class Foo provides such a conversion, that is.

So if List defines a sensible conversion to Pair (which I don't know), it's as simple as

my %hash = =$fh.map: { .split(/\t/, 2).Pair };

If it's not, you can go the way of a temporary variable, which you seem to avoid in your examples:

my %hash = =$fh.map: { my @a = .split(/\t/, 2); @a[0] => @a[1] };

(This will store an undef as the value of the pair if there's not \t in $_).

If you don't want to use that temporary variable, you can re-use $_ in an inner lexical scope with this evil trick:

my %hash = =$fh.map: { given .split(/\t/, 2) { .[0] => .[1] } };

This uses .[$index] to index $_ (all method calls without an explicit object work on $_).

It's not fundamentally better than the Perl 5 approach IMHO, so I'll keep thinking about a nicer solution.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://718772]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others exploiting the Monastery: (1)
As of 2026-02-11 19:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    hippoepoptai's answer Re: how do I set a cookie and redirect was blessed by hippo!
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.