Re: Shortest non-numeric Perl expression for each number

[Smylers]

Ton Hospel writes:

> For a good average:
> 
> $X[0]  = $a;
> $X[1]  = //;
> $X[2]  = $^F++;
> $X[3]  = $^F++;
> $X[4]  = $^F++;
> $X[5]  = $^F++;

For a slightly shorter average:

  $X[2]  = $^F;
  $X[3]  = ++$^F;
  $X[4]  = ++$^F;
  $X[5]  = ++$^F;

Smylers