fork download
  1. #!/usr/bin/perl
  2.  
  3. $i = 5;
  4. $i += ++$i + $i++;
  5. print $i, "\n";
Success #stdin #stdout 0s 3608KB
stdin
Standard input is empty
stdout
20