my $day_of_year  = 1; # or whatever
@days_of_week = ('Sunday', 
                 'Monday', 
                 'Tuesday', 
                 'Wednesday', 
                 'Thursday', 
                 'Friday', 
                 'Saturday');
print $days_of_week[($day_of_year+3)%7];