Letzten Monatstag ermitteln

[seth_not@home]

gudn tach!

da gibt's besseres: [...]

aeh, und das geht sogar noch praegnanter und einfacher:

#!/usr/bin/perl  
use strict;  
use warnings;  
use DateTime;  
  
print DateTime->last_day_of_month(  
	year  => 2013,  
	month => 3,  
)->day,"\n";  

prost
seth