my $bild_lb = $mw->Label(-text => ...
$mw->Button(-text => "Wählen sie ...
            -command => [ \&datei_auswaehlen, $bild_lb ],
           )->grid(-row=>$i, -column =>0);