{
    my $static;
    BEGIN { $static= "Initial value" }
    sub usesStatic {
        # ...
    }
}