Did someone say golf?

sub chain{(*f,*_)=@_;@_=&$_ for@f;@_}
[download]

Of course you probably want strict compliant and it is bad style to modify your arguments in place. In which case it is probably better to make that:

sub chain{my($f,$a)=@_;$a=[&$_(@$a)]for@$f;@$a}
[download]

which is still reasonable...