#!perl -l
use strict;
use warnings;
BEGIN{ our $v }
print "v: $::v";