my $spinbox = $mw->Spinbox(-from => 1980, -to => 2037, -command => sub {
print $anzeige_jahr_w->get()})->pack();

$spinbox->bind('<Return>',sub { ... Command von Spinbox ausführen ohne die Sub doppelt anzulegen ...});