昨日の日付を取得するには？

にし 1999/12/28(火) 10:10:59
perlで昨日の日付や２日前の日付を取得するにはどうしたらいいのでしょうか？

kala 1999/12/28(火) 10:19:16
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time - n*24*60*60);
こんな感じで、nには日数を入れます。