- or download this
{
my $static;
BEGIN { $static= "Initial value" }
...
# ...
}
}
- or download this
sub usesStatic {
my $static= "Initial value" BEGIN;
# ...
}
- or download this
sub usesStatic {
my $static if 0;
# ...
}
- or download this
eval q{
conditional code;
} if condition BEGIN;