Extract week start,end date from given date in PERL

Hi All,
what i want to do in perl is i should give the date at run time .Suppose date given is 23/12/2011(mm/dd/yyyy) the perl script shold find week start date, week end date, previous week start date,end date,next week start date, end date. In this case
week start date will be-:12/19/2011
week end date will be-:12/25/2011
previous week start date -:12/12/2011
previous week end date -:12/18/2011
next week start date -:12/26/2011
next week start date -01/01/2012
week start from Monday
week end at Sunday

What have you tried? Is this your coursework/homework question?

actually i am implementing my project task and i want to do this using date time function if possible