Select Code to Download

$bobs_wifes_name = perform { $_->name } wherever $bob->spouse;

$bobs_wifes_name = wherever $bob->spouse, perform { $_->name };