Depends where you declare it.

my $keeps_value;

sub func {
   my $loses_value;
   state $also_keeps_value;   # Perl 5.10
   ...
}
[download]