2 <TD ALIGN="right"><% mt('From: ') |h %></TD>
4 <& /elements/select-month_year.html,
6 'selected_mon' => $smonth,
7 'selected_year' => $syear,
14 <TD ALIGN="right"><% mt('To: ') |h %></TD>
16 <& /elements/select-month_year.html,
18 'selected_mon' => $emonth,
19 'selected_year' => $eyear,
25 my ($curmon,$curyear) = (localtime(time))[4,5];
28 my $syear = 1899+$curyear;
29 my $smonth = $curmon+1;
31 #want 12 month by default, not 13
33 if ( $smonth > 12 ) { $smonth-=12; $syear++ }
36 my $eyear = 1900+$curyear;
37 my $emonth = $curmon+1;
40 'show_month_abbr' => 1,
41 'start_year' => '1999',
42 'end_year' => '2019', #and that's really the end of the line for 3.x