Help for this page

Select Code to Download

Select or download this

    use vars::i '$VERSION' => 3.44;
    use vars::i '@BORG' => 6 .. 6;
    use vars::i '%BORD' => 1 .. 10;
    use vars::i '&VERSION' => sub(){rand 20};
    use vars::i '*SOUTH' => *STDOUT;

Select or download this

our $VERSION = 3.44;
our @BORG = (6);
...
our *SOUTH = *STDOUT;

sub VERSION () { rand 20 }