in reply to if variants

Note that you can do more than one thing on a "one-line if" by using the comma operator:

$state = 3, next if $tok eq 'a';

Replies are listed 'Best First'.
Re^2: if variants
by dimar (Curate) on Oct 19, 2004 at 15:34 UTC

    or more generally, with a CODEREF

    sub{ MowLawn(); WashCar(); InvadePakistan();}->() if $bNotRaining;

    [download]
[reply]
[d/l]
Re^2: if variants
by Anonymous Monk on Oct 19, 2004 at 14:11 UTC
    Or more generally, with a do statement: 
    do {local($,) = (',');
    print(@array);} if $tok eq 'a';

    [download]
[reply]
[d/l]

In Section Meditations