Arrays: Difference between revisions
Content added Content deleted
(Added XLISP) |
(→{{header|Perl}}: Migrating from http://rosettacode.org/wiki/Creating_an_Array) |
||
Line 3,759: | Line 3,759: | ||
=={{header|Perl}}== |
=={{header|Perl}}== |
||
In-line |
|||
<lang perl> my @empty; |
|||
my @empty_too = (); |
|||
my @populated = ('This', 'That', 'And', 'The', 'Other'); |
|||
print $populated[2]; # And |
|||
my $aref = ['This', 'That', 'And', 'The', 'Other']; |
|||
print $aref->[2]; # And |
|||
</lang> |
|||
Dynamic |
Dynamic |
||
Line 3,770: | Line 3,782: | ||
print $arr[0];</lang> |
print $arr[0];</lang> |
||
Two-dimensional |
|||
<lang perl> my @multi_dimensional = ( |
|||
[0, 1, 2, 3], |
|||
[qw(a b c d e f g)], |
|||
[qw(! $ % & *)], |
|||
); |
|||
</lang> |
|||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |