#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;

my @stuff = (
    ['one', 'two', 'three', 'four'],
    [7, 6, 5],
    ['apple', 'orange'],
    [0.3, 'random', 'stuff', 'here', 5],
);

print Dumper \@stuff;