10 lines
84 B
Perl
10 lines
84 B
Perl
use utf8;
|
|
use v5.10;
|
|
|
|
sub Δ () : lvalue {
|
|
state $val;
|
|
}
|
|
|
|
Δ = 1;
|
|
Δ++;
|
|
say Δ;
|