Help for this page

Select Code to Download


  1. or download this
    package App::Constants; # NOT its real name

...
our @EXPORT_OK = qw(MAX_PRIORITY DEFAULT_WIDTH MSG_DATA);
our %EXPORT_TAGS = (default => \@EXPORT_OK);
1;
  2. or download this
    package App::Document;

...
}

1;
  3. or download this
    @{+MSG_DATA}; # syntactic separation with unary plus
@{MSG_DATA()}; # function that returns reference to array
  4. or download this
    /#!/usr/bin/perl
use warnings;
use strict;
use brain;