Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: Delete holiday from array of hashes when US & CA share a holiday

by tangent (Curate)
on Mar 01, 2012 at 21:21 UTC ( #957326=note: print w/ replies, xml ) Need Help??


in reply to Delete Duplicate CA & US holidays

Update: this comment was moved from another node where the OP was garbled.

A bit hard to decipher because although you did use code tags you didn't use them properly. Quite a few improvements could be made but a quick solution would be to change your function like so:

sub strip_US_CA_dup_hols { for my $country (@cntry_of_issue) { for my $holiday (@{$countries{$country}}) { $seen{$holiday}++; } } for my $country (@cntry_of_issue) { my $aref = $countries{$country}; @$aref = grep { $seen{$_} < 2 } @$aref; } } # Prints: 'US' => [ '20120116', '20120528', '20120704', '20121122' ], 'CA' => [ '20120521', '20120702', '20120806', '20121008', '20121226' ]


Comment on Re: Delete holiday from array of hashes when US & CA share a holiday
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (17)
As of 2014-12-19 13:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (83 votes), past polls