Select Code to Download

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

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