my( $var1, $var2 ) = (
    subroutine0_with_return_value(),
    subroutine1_with_return_value()
);