@vlinks = sort {
		   $a->{title}  cmp $b->{title}
		or $a->{pages}  <=> $b->{pages}
		or $a->{author} cmp $b->{author}
	} @vlinks;