#!/usr/bin/perl -w my @list = qw( 1 2 3 4 5 ); my @head = $list[0]; my @tail = @list[1..$#list]; print "List: $_\n" foreach @list; print "Head: $_\n" foreach @head; print "Tail: $_\n" foreach @tail; __END__ List: 1 List: 2 List: 3 List: 4 List: 5 Head: 1 Tail: 2 Tail: 3 Tail: 4 Tail: 5
In reply to Re: head of list + rest of list
by Transient
in thread head of list + rest of list
by jjohhn
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |