sub head (@) { $_[0] }