print "££".$unsorted[0]->function." ";
@sorted = sort {$unsorted[$a]->function <=> $unsorted[$b]->function} @unsorted;
####
Use of reference "GARD::Book=HASH(0x2b7831c)" as array index at db.pl line 439.
Can't call method "function" on unblessed reference at db.pl line 439.