-browsecommand => sub{
            my ($von, $nach) = @_;
            
            my $row = (split(m/\,/, $nach))[0];

            say "Zeile: $row";
}