diff options
Diffstat (limited to 'challenge-057/alicia-bielsa/perl/lib/BinaryTreeNode.pm')
| -rw-r--r-- | challenge-057/alicia-bielsa/perl/lib/BinaryTreeNode.pm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/challenge-057/alicia-bielsa/perl/lib/BinaryTreeNode.pm b/challenge-057/alicia-bielsa/perl/lib/BinaryTreeNode.pm new file mode 100644 index 0000000000..ddddc28d85 --- /dev/null +++ b/challenge-057/alicia-bielsa/perl/lib/BinaryTreeNode.pm @@ -0,0 +1,13 @@ +package BinaryTreeNode; +use Moose; +use Data::Dumper; + +has 'value' => (is => 'rw', isa => 'Str'); +has 'left' => (is => 'rw', isa => 'BinaryTreeNode' ); +has 'right' => (is => 'rw', isa => 'BinaryTreeNode' ); +has 'level' => (is => 'rw', isa => 'Int'); +has 'root' => (is => 'rw', isa => 'Bool', default => 0); + + + +1;
\ No newline at end of file |