Select Code to Download

    @ary = (1, 3, sort 4, 2);
    print @ary;         # prints 1324

    # These evaluate exit before doing the print:
    print($foo, exit);  # Obviously not what you want.
...
    (print $foo), exit; # This is what you want.
    print($foo), exit;  # Or this.
    print ($foo), exit; # Or even this.