View Single Post
  #3   (View Single Post)  
Old 25th September 2009
Business_woman's Avatar
Business_woman Business_woman is offline
lieutenant
 
Join Date: May 2008
Posts: 45
Default

Quote:
Originally Posted by ephemera View Post
Code:
cal aug 2009 | perl -nae '$w=$weeknum=1; @d=split if $.==2;if($.==$w+2){for(0..6){if(defined($F[$_])){$_-=@F if $w==1;print "$d[$_] "}};print "\n" if @F!=0}'
Set the variable $weeknum (1-6) as required.
Seriously?
__________________
I like cookies...
Reply With Quote