Help for this page

Select Code to Download

Select or download this

{ 
  my $var;
...
  sub getter { $var };
  sub setter { $var = shift };
}