Select Code to Download

# Haskell programmer:
my ($head, @tail) = @array;
...
# Perlfunc Author
my $head = splice @array, 0, 1;
my @tail = @array;

# Haskell programmer:
my ($head, @tail) = list;
...
# Perlfunc Author
my @tail = list;
my $head = splice @tail, 0, 1;