my $pfeil = $mw->Photo(
    'PFEIL', # NameNr vergeben
    -file => $glob->{'NavPfeil'},
);
my $pfeilSpacer = $mw->Photo(
    'PFEILTRENNER', # NameNr vergeben
    -file => $glob->{'NavTrenner'},
);
# ...
    my $innerFrame = $daten->Frame();
    my $innerGrid00 = $innerFrame->Label(-image => $pfeil)->pack(
        -anchor=>'n',
        -expand =>1,
        -side =>'top',
        -ipadx => 0, -ipady => 0,
        -padx  => 0, -pady  => 0,
    );
    my $innerGrid01 = $innerFrame->Label(-image => $pfeilSpacer)->pack(
        -fill=>"both",
        -anchor=>'n',
        -expand =>1,
        -side =>'top',
        -ipadx => 0, -ipady => 0,
        -padx  => 0, -pady  => 0,
    );