Select Code to Download

var() = foo() + bar() * baz();

var() = foo() + bar() * baz();
  6       1       2       3
      7       5       4

my $x;

...
var() = foo() + bar() * baz();

print($x);

>perl 709887.pl
foo
...
baz
var
23

>perl -le"$i=3; print 0+$i,$i,++$i,$i"
3444