use strict Pragma : strict « Language Basics « Perl






  1. Perl
  2. Language Basics
  3. strict

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";








Related examples in the same category

1.use strict 'refs';
2.use strict 'subs';
3.use strict 'vars';
4.use strict;
5.'use strict' and subroutine
6.'use strict' with package
7.no strict 'refs';
8.The strict Pragma
9.Using the strict Pragma