<div dir="ltr"><div class="gmail_default" style="font-family:arial,helvetica,sans-serif">I was glad to see an email on this channel once again!</div><div><div dir="ltr" class="gmail_signature" data-smartmail="gmail_signature"><br></div><div dir="ltr" class="gmail_signature" data-smartmail="gmail_signature">Regards,<br>Sean<br><br><div>Sean Blanton</div><div><a href="mailto:sean@blanton.com" target="_blank">sean@blanton.com</a></div></div></div><br></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Mon, May 18, 2020 at 9:26 AM Jay S <<a href="mailto:me@heyjay.com">me@heyjay.com</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr">Hi Steve thanks for the write up.<div>It nice to hear from you.</div><div>Jay</div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Mon, May 18, 2020 at 1:58 AM Steven Lembark <<a href="mailto:lembark@wrkhors.com" target="_blank">lembark@wrkhors.com</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">On Sun, 17 May 2020 15:01:45 -0400<br>
James E Keenan <<a href="mailto:jkeenan@pobox.com" target="_blank">jkeenan@pobox.com</a>> wrote:<br>
<br>
> On 5/17/20 12:49 PM, Jay S wrote:<br>
> > Hi Perl mongers, I'm not sure if this list is still on|active.<br>
> > I hope everyone is doing well and staying sane.<br>
> > I haven't programmed in a long time and can't remember stuff. How<br>
> > do make a list out of a hash?<br>
> > <br>
> > Instead of:<br>
> > my $ClubID = $data{ClubID};<br>
> > my $GameCode = $data{GameCode};<br>
> > my $DateStarted = $data{DateStarted};<br>
> > my $GameType = $data{GameType};<br>
> > <br>
> > I'd like to do something like this but can't remember the proper <br>
> > incantation:<br>
> > my ($ClubID, $GameCode, $DateStarted, $GameType) = @data(qw[ClubID <br>
> > GameCode DateStarted GameType]);<br>
<br>
You are looking for a "hash slice":<br>
<br>
Quick refresher: The data type you are extracting from is specified<br>
by curly or square braces:<br>
<br>
foo{ ... } access foo as a hash<br>
foo[ ... } access foo as an an array<br>
<br>
You are extracting a list of values (vs. key+value pairs) which <br>
leaves you with:<br>
<br>
@foo{ ... }<br>
<br>
to pull out the values of interest.<br>
<br>
qw takes open-close pairs, I tend to prefer parens since they look <br>
look more "list-ish" to me and doesn't get mistaken for an arrayref.<br>
<br>
Leaves:<br>
<br>
my ($ClubID, $GameCode, $DateStarted, $GameType) <br>
= @data{ qw( GameCode DateStarted GameType ) };<br>
<br>
or <br>
my @keyz = [ qw( GameCode DateStarted GameType ) ]; <br>
<br>
...<br>
<br>
my ($ClubID, $GameCode, $DateStarted, $GameType) = @data{ @keyz };<br>
<br>
or<br>
<br>
state $keyz = [ qw( GameCode DateStarted GameType ) ]; <br>
<br>
...<br>
<br>
my ($ClubID, $GameCode, $DateStarted, $GameType) = @data{ @$keyz };<br>
<br>
<br>
Note that perl recently added a "kv-slice" which returns the <br>
keys and values using a '%' sigil instead of '@':<br>
<br>
my ($ClubID, $GameCode, $DateStarted, $GameType) = %data{ @keyz };<br>
<br>
this would provide a list of key-value pairs suitable for assigning<br>
to a new hash (if you saw that while experimenting you mistyped a <br>
'%' instead of a '@'.<br>
<br>
Zei gesund<br>
<br>
-- <br>
Steven Lembark<br>
Workhorse Computing<br>
<a href="mailto:lembark@wrkhors.com" target="_blank">lembark@wrkhors.com</a><br>
+1 888 359 3508<br>
_______________________________________________<br>
Chicago-talk mailing list<br>
<a href="mailto:Chicago-talk@pm.org" target="_blank">Chicago-talk@pm.org</a><br>
<a href="https://mail.pm.org/mailman/listinfo/chicago-talk" rel="noreferrer" target="_blank">https://mail.pm.org/mailman/listinfo/chicago-talk</a><br>
</blockquote></div>
_______________________________________________<br>
Chicago-talk mailing list<br>
<a href="mailto:Chicago-talk@pm.org" target="_blank">Chicago-talk@pm.org</a><br>
<a href="https://mail.pm.org/mailman/listinfo/chicago-talk" rel="noreferrer" target="_blank">https://mail.pm.org/mailman/listinfo/chicago-talk</a><br>
</blockquote></div>