Select Code to Download

my @simpsons = $storage->select( $person,
        $person->{name} eq 'Simpson' & $person->{age} > 35
);