What is the difference between ‘my’ and ‘our’ in Perl?

by

How does our differ from my and what does our do?

In Summary:

Available since Perl 5, my is a way to declare non-package variables, that are:

  • private
  • new
  • non-global
  • separate from any package, so that the variable cannot be accessed in the form of $package_name::variable.

On the other hand, our variables are package variables, and thus automatically:

  • global variables
  • definitely not private
  • not necessarily new
  • can be accessed outside the package (or lexical scope) with the
    qualified namespace, as $package_name::variable.

Declaring a variable with our allows you to predeclare variables in order to use them under use strict without getting typo warnings or compile-time errors. Since Perl 5.6, it has replaced the obsolete use vars, which was only file-scoped, and not lexically scoped as is our.

For example, the formal, qualified name for variable $x inside package main is $main::x. Declaring our $x allows you to use the bare $x variable without penalty (i.e., without a resulting error), in the scope of the declaration, when the script uses use strict or use strict "vars". The scope might be one, or two, or more packages, or one small block.

More Related Contents:

  1. Why is three-argument open calls with autovivified filehandles a Perl best practice?
  2. How should I use the “my” keyword in Perl?
  3. Local and Global variables in perl
  4. Nested subroutines and Scoping in Perl
  5. Remove Text between two Strings
  6. If condition based look up not working [closed]
  7. Detecting when an else block gets executed for the second time [closed]
  8. Why use strict and warnings?
  9. Why does modern Perl avoid UTF-8 by default?
  10. Why are Perl 5’s function prototypes bad?
  11. How can I require an optional Perl module if installed?
  12. Specifying file to process to Perl one-liner
  13. How do I run a Perl script from within a Perl script?
  14. How can I parse dates and convert time zones in Perl?
  15. How do I tell if a variable has a numeric value in Perl?
  16. Using perl’s `system`
  17. What’s the best way to open and read a file in Perl?
  18. Perl memory usage profiling and leak detection?
  19. Global symbol requires explicit package name
  20. How do I include functions from another file in my Perl script?
  21. How can I store the result of a system command in a Perl variable?
  22. Use of ‘use utf8;’ gives me ‘Wide character in print’
  23. How can I interact with ClearCase from Perl?
  24. What reasons are there to prefer glob over readdir (or vice-versa) in Perl?
  25. How do I convert a date/time to epoch time (unix time/seconds since 1970) in Perl?
  26. What does =~ do in Perl? [closed]
  27. In Perl, is it better to use a module than to require a file?
  28. Demystifying the Perl glob (*)
  29. Why does !1 give me nothing in Perl?
  30. How do I print unique elements in Perl array?

Leave a Comment