use strict;
use warnings;

use MyParser ();

my $hParser = MyParser->new();
my $szCode = "x = 1\ny = 2\nz = 3";
$hParser->test($szCode)
   or die("Bad code\n");
$hParser->DumpResult();