$x= @a[4];
@y= @a[4,5,6];
$q= @a[@s];