Name "main::x123" used only once: possible typo at Z:\test.pl line 6.
$VAR1 = {
          'a' => 'x123'
        };
$VAR2 = {
          'b' => 'data'
        };