Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: (Golf) Next second Tuesday

by linuxer (Curate)
on Apr 08, 2009 at 00:22 UTC ( #756193=note: print w/replies, xml ) Need Help??


in reply to (Golf) Next second Tuesday

I parsed the output of the cal command for my solution:

cal 3 2009 | perl -anle '$.==1&&do{print};@F=unpack"A3"x7,$_;$.>2&&$F[ +2]=~m/^\s*\d+$/&&++$a==2&&print$F[2];'

If you want to specify the day's shortname (like 'Tu' for Tuesday) I had the slightly longer version:

cal 4 2009 | perl -anle '$.==1&&do{print};@F=unpack"A3"x7,$_;$.==2&&do +{@i{@F}=0..$#F};$.>2&&$F[$i{"Tu"}]=~m/^\s*\d+$/&&++$a==2&&print$F[$i{ +"Tu"}];'

First one counts 82 and the second 121 characters (not counted cal [arguments] | perl -anle and the surrounding single quotes.

Replies are listed 'Best First'.
Re^2: (Golf) Next second Tuesday
by shmem (Chancellor) on Apr 09, 2009 at 21:08 UTC

    well, for that matter, 69 chars not counting 'date '...

    date "+%Y-%m-$(env LC_ALL=C cal|sed 1,2d|cut -c7-8|grep '[0-9]'|sed -n + 2p)"

    ...but the rules say

    if the second Tuesday of the current month has passed, give the second Tuesday of the next month

    so that doesn't qualify either ;-)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://756193]
help
Chatterbox?
[Corion]: Hi Lady_Aleena!
[Lady_Aleena]: marioroy, are you also writing a Meditation for this?
choroba o/
Discipulus adds tozzetti alle mandorle to the platter on the sideboard.
Lady_Aleena was checking #cbstream and saw the big announcement.
[marioroy]: Tie::IxHash can be shared. Also similar modules. I cannot wait to post a solution sharing Tie::File and iterating among workers.
[marioroy]: Lady_Aleena Yes, will post something with all the new features. Parallel with few lines of code.
[marioroy]: Yes, will do for PM. I love PM.
Lady_Aleena ponders a meditation of her own, but it would be on a far far less important topic.
[marioroy]: I'm hoping to have a release in about a week's time.

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2017-05-26 08:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?