$c = do { $a = 3, $b = 6 };   # a block, $c = 6