my $data = {
        Sleep   => 51,
        Work    => 135,
        Access  => 124,
        mySQL   => 5
   };

   my $ca = $mw->Graph(
                -type  => 'BARS',
        )->pack(
                -expand => 1,
                -fill => 'both',
        );

   $ca->configure(-variable => $data);     # bind to data

   # or ...

   $ca->set($data);        # set data

##</code><code>##

    $data = {
        $queue => $usage
    };

    $ca = $MW->Graph(-type => 'BARS', -ylabel => 'percentage', -xlabel => 'queue');
    $ca->pack(-expand => 1, -fill => 'both');

##</code><code>##

    $data->{$queue} = $usage;