On 1/11/19 11:50 AM, Bruce Gray wrote:
'my $x = "Ace"; my %Vendors = ( acme => { ContactName => "Larry", AccountNo => 1234 }, Ace => { ContactName => 
"Mo", AccountNo => "A102" } ); say %Vendors{$x}<ContactName> ~ "\t" ~ %Vendors{$x}<AccountNo>;’

Hi Bruce,

Sweet!  Thank you!

$ p6 'my $x = "Ace"; my %Vendors = ( acme => { ContactName => "Larry", AccountNo => 1234 }, Ace => { ContactName => "Mo", AccountNo => "A102" } ); say %Vendors{$x}<ContactName> ~ "\t" ~ %Vendors{$x}<AccountNo>;'

Mo      A102

-T

Reply via email to