Module::get_scalar() : Package « Language Basics « Perl






Module::get_scalar()

  


#!/usr/bin/perl
use warnings;
use strict;

use Symbol;

my $fqref = qualify_to_ref('scalar','My::Module');
$$fqref =\"Hello World\n";
print My::Module::get_scalar();


package My::Module;
our $scalar;

sub get_scalar {
    return $scalar;
}

   
    
  








Related examples in the same category

1.A package is a separate name space for variables to reside in.
2.Contents of the symbol table for the main package.
3.Default package is main
4.Define variables with the same name in different package
5.Out value scope
6.Package declarations and subroutine
7.Reference variable by package name
8.Requires the package created above and calls the subroutine declared within it:
9.Scope change
10.Switches between packages.
11.This code should be stored in the file Mymodule.pm.
12.Using the package keyword to change the package context
13.You have to tell Perl which packages you intend to use, with the use command:
14.Your package