5 lines
98 B
Perl
5 lines
98 B
Perl
my @multi_dimensional = (
|
|
[0, 1, 2, 3],
|
|
[qw(a b c d e f g)],
|
|
[qw(! $ % & *)],
|
|
);
|