Select Code to Download

package XYZ;
use strict; use warnings;
...
 $self->{'ABC'} = 42;
 return $self
}