my @values = $c->itemconfigure(qw/current -background/); my $bg = $values[4];