$ perl tst.pl
$VAR1 = [
          [
            2,
            'abc',
            50
          ]
        ];
$VAR2 = [
          [
            14,
            'abc',
            40
          ],
          [
            46,
            'abc',
            40
          ]
        ];
$VAR3 = [
          [
            12,
            'abc',
            30
          ],
          [
            24,
            'abc',
            30
          ],
          [
            26,
            'abc',
            30
          ]
        ];