A propósito: > my $basedate = DateTime->now( time_zone=>'Europe/Amsterdam' ) > ->truncate( to => 'day' ); pode ser escrito: my $basedate = DateTime->today( time_zone=>'Europe/Amsterdam' ); > Human->get_by_alias( FGlock )->drinks( owned_by => champs ) > ->increment; vou cobrar isso em seguida :) - Flavio S. Glock