use strict; use vars::i qw' $c 1'; [download]
In reply to Re^2: BEGIN blocks and use strict positioning by Anonymous Monk in thread BEGIN blocks and use strict positioning by codeacrobat