+++ /dev/null
-package SimpleClass;
-
-
-my @name = qw(bob bill brian babette bobo bix);
-my @age = qw(99 12 44 52 12 43);
-my @weight = qw(99 52 80 124 120 230);
-
-
-sub new {
- my $this = shift;
- bless {}, ref($this) || $this;
-}
-
-sub load_data {
- my @data;
-
- for (0 .. 5) {
- push @data, {
- age => shift @age,
- name => shift @name,
- weight => shift @weight
- }
- }
-
- \@data
-}
-
-
-1;