Select Code to Download

    $result = func1( $var++ ) op func2( $var );

sub read_a_line {return scalar <STDIN>}

my $two_lines = read_a_line() . read_a_line();

my $two_lines  = read_a_line();
   $two_lines .= read_a_line();

    EXPR1 OP EXPR2