$slist = Gtk2::SimpleList->new (
              'Enabled'    => 'bool',
              'Scanner'    => 'text',
              'Media'      => 'text',
              'Description' => 'text'
            );

@{$slist->{data}} = (
        ['1','test','CDR','Long Description'],
        ['0','test 2','CDR'],
        ['0','test 3','CDR'],
);