use feature qw(state);
# also
use 5.10.0;

sub foo {
    state @bar;
    ...
}