$affection = 'noble' and do { $generosity++; $jollity++ }; warn --$promise if push @red_hot_momise, $affection;