in reply to Re: Calendar question
in thread Calendar question

In that case simple copy 
my(@monthar)=@month;

[download]

In Section Seekers of Perl Wisdom