in reply to BEGIN blocks and use strict positioning

Given the explanations, here are possible solutions: 
perl -e 'use strict; our $c; BEGIN{ $c=1 } print $c'

[download]
perl -e 'use strict; BEGIN{ our $c=1 } our $c; print $c'

[download]
perl -e 'use strict; BEGIN{ our $c=1 } print our $c'

[download]

Replies are listed 'Best First'.
Re^2: BEGIN blocks and use strict positioning
by Anonymous Monk on Apr 21, 2006 at 08:02 UTC
[reply]
[d/l]

In Section Seekers of Perl Wisdom