]> iEval git - html-element-library.git/blob - t/SimpleClass.pm
first commit
[html-element-library.git] / t / SimpleClass.pm
1 package SimpleClass;
2
3
4 my @name = qw(bob bill brian babette bobo bix);
5 my @age = qw(99 12 44 52 12 43);
6 my @weight = qw(99 52 80 124 120 230);
7
8
9 sub new {
10 my $this = shift;
11 bless {}, ref($this) || $this;
12 }
13
14 sub load_data {
15 my @data;
16
17 for (0 .. 5) {
18 push @data, {
19 age => shift @age,
20 name => shift @name,
21 weight => shift @weight
22 }
23 }
24
25 \@data
26 }
27
28
29 1;
This page took 0.0500389999999999 seconds and 4 git commands to generate.