Lists or Arrays Creation: my @first_fibs = (1, 1, 2, 3, 5, 8, 13, 21);my @chars = 'a' .. 'z';my @count = 13 .. 27;. . . and you may use the qw() operator to split a literal string on whitespace to produce a list of strings: my @stooges = qw( Larry Curly Moe Shemp Joey Kenny );. . . as targets of assignments: my ($package, $filename, $line) = caller();. . . or as lists of expressions: say name(), ' => ', age();Empty the array @my_array = ();count the elements of the array my $count = () = get_the_hats(); |
Perl >