sub routine { state %hash = ...; ... %hash ... } #### my %hash; BEGIN { %hash = ...; } sub routine { ... %hash ... }