Language Basics Perl

  1. Home
  2. Perl
  3. Language Basics
  4. Use strict Pragma
use strict "vars";
my $name = "Tom";       #All variables are lexical in scope
our @friends = qw(Tom Stefan Bin Marie);
our $newspaper = "The Globe";
print "$name and $friends[0] read the $newspaper.\n";