Select Code to Download

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

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

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