# The following are constants
my $FOO = "BAR"; 
my @BAR = qw/This is a constant array/;
my %HASH = (1=>2, 2=>3);