$result = func1( $var++ ) op func2( $var ); #### sub read_a_line {return scalar } #### my $two_lines = read_a_line() . read_a_line(); #### my $two_lines = read_a_line(); $two_lines .= read_a_line(); #### EXPR1 OP EXPR2