Help for this page

Select Code to Download


  1. or download this
    package TieAccess;
use strict;
...
$variable = 100;

print "$variable\n";
  2. or download this
    my $variable = 100
  3. or download this
    my $variable;
tie $variable, "TieAccess", "variable";
$variable = 100;