Gtk2-Ex-TiedListColumn

 view release on metacpan or  search on metacpan

devel/array-base.t

diag ("Compiled against Gtk version ",
      Gtk2::MAJOR_VERSION(), ".",
      Gtk2::MINOR_VERSION(), ".",
      Gtk2::MICRO_VERSION(), ".");
diag ("Running on       Gtk version ",
      Gtk2::major_version(), ".",
      Gtk2::minor_version(), ".",
      Gtk2::micro_version(), ".");


$[ = 6;

my $store = Gtk2::ListStore->new ('Glib::String');
$store->set ($store->insert(0), 0=>'zero');
$store->set ($store->insert(1), 0=>'one');
$store->set ($store->insert(2), 0=>'two');
my @a;
tie @a, 'Gtk2::Ex::TiedListColumn', $store;

# FETCHSIZE
is (scalar @a, 3);

 view all matches for this distribution
 view release on metacpan -  search on metacpan

( run in 0.473936 second using v1.00-cache-1.03-grep-7fa205e-cpan-6421e59f23b )