This shows you the differences between two versions of the page.
— |
kurs:bla.t [2014/09/10 21:22] (current) |
||
---|---|---|---|
Line 1: | Line 1: | ||
+ | <code> | ||
+ | BEGIN { use_ok('Bla') }; | ||
+ | use Bla; | ||
+ | use Data::Dumper; | ||
+ | |||
+ | my $bla = Bla->new; | ||
+ | |||
+ | $bla->name(blu); | ||
+ | $bla->role(asdasd); | ||
+ | print Dumper $bla; | ||
+ | </code> |