It’s easy to make a chart 

my @products = (
  'Buzzy Bees', 'Kiwifruit Wine', 'Paua Earrings'
);

my @sales_data = (
    [ 2006, 2007, 2008, 2009 ],   # X value labels
    [   54,   52,   50,   48 ],   # Buzzy Bees
    [   38,   37,   30,   17 ],   # Kiwifruit Wine
    [   24,   28,   34,   44 ],   # Paua Earrings
);