Help for this page

Select Code to Download


  1. or download this
    *$datum = sub {
   my self = shift;
   $self->{$datum} = shift if @_;
   return $self->{$datum};
};
  2. or download this
    *$datum = sub {
   $self->{$datum} = shift if @_;
   return $self->{$datum};
};
  3. or download this
    *$datum = sub {
   $datum = shift if @_;
   return $datum;
};
  4. or download this
    $datum = sub {
   my self = shift;
   $self->{$datum} = shift if @_;
   return $self->{$datum};
};