Re^2: Getting the Latest Date Issue

This is printing that:

<option selected value="3/6/2008">3/6/2008</op
 <option value="3/5/2008">3/5/2008</option>
 <option value="3/4/2008">3/4/2008</option>
 <option value="3/3/2008">3/3/2008</option>
 <option value="2/29/2008">2/29/2008</option>
 <option value="2/28/2008">2/28/2008</option>
 <option value="2/27/2008">2/27/2008</option>
 <option value="2/26/2008">2/26/2008</option>
 <option value="2/25/2008">2/25/2008</option>
 <option value="2/22/2008">2/22/2008</option>
 <option value="2/21/2008">2/21/2008</option>
 <option value="2/20/2008">2/20/2008</option>
 <option value="2/19/2008">2/19/2008</option>
 <option value="2/18/2008">2/18/2008</option>
 <option value="2/15/2008">2/15/2008</option>
 <option value="2/14/2008">2/14/2008</option>
 <option value="2/13/2008">2/13/2008</option>
 <option value="2/12/2008">2/12/2008</option>
 <option value="2/11/2008">2/11/2008</option>
 <option value="2/8/2008">2/8/2008</option>
 <option value="2/7/2008">2/7/2008</option>
 <option value="2/6/2008">2/6/2008</option>
 <option value="2/5/2008">2/5/2008</option>
 <option value="2/4/2008">2/4/2008</option>
 <option value="2/1/2008">2/1/2008</option>
 <option value="1/31/2008">1/31/2008</option>
 <option value="1/30/2008">1/30/2008</option>
 <option value="1/29/2008">1/29/2008</option>
 <option value="1/28/2008">1/28/2008</option>
 <option value="1/25/2008">1/25/2008</option>
 <option value="1/24/2008">1/24/2008</option>
 <option value="1/23/2008">1/23/2008</option>
[download]

How can I get today's date to be the last one before "1/23/2008

Thanks!!!!

Comment on Re^2: Getting the Latest Date Issue Download Code

Replies are listed 'Best First'.
Re^3: Getting the Latest Date Issue by apl (Monsignor) on Jan 22, 2008 at 19:48 UTC
You could do a `$d = new Date::Business(DATE => '20071123', OFFSET => 1 );` to get the date for the day after 01/23/2008.	[reply] [d/l]
Re^4: Getting the Latest Date Issue by Anonymous Monk on Jan 22, 2008 at 19:51 UTC
The code actually works on the dates, I just need to figure it out how the dropdown above will have the last option as today's date!	[reply]
Re^3: Getting the Latest Date Issue by Anonymous Monk on Jan 22, 2008 at 19:27 UTC
I forgot, course after doing the reverse like this: if (($dow != 6) && ($dow != 7)){ if ("$mon/$mday/$year" eq $selected_date_from){ push(@date_dd_from_r,"<option selec +ted value=\"$mon/$mday/$year\">$mon/$mday/$year</option>\n"); @date_d +d_from = reverse @date_dd_from_r; }else{ push(@date_dd_from_r,"<option +value=\"$mon/$mday/$year\">$mon/$mday/$year</option>\n"); + @date_dd_from = reverse @date_dd_from_r; } if ("$mon/$mday/$year" eq $selected_date_to){ push(@date_dd_to_r," +<option selected value=\"$mon/$mday/$year\">$mon/$mday/$year</option> +\n"); @date_dd +_to = reverse @date_dd_to_r; }else{ push(@date_dd_to_r,"<option va +lue=\"$mon/$mday/$year\">$mon/$mday/$year</option>\n"); + @date_dd_to = reverse @date_dd_to_r; } } [download] Just need to know how to have today's date to the list.	[reply] [d/l]