Select Code to Download

use Symbol;

...
    bless ($self,$class_name);
    return $self;     
}

     $object->method($arg1,$arg2);

...
          print "append is ",$self->{"append"},"\n";
          $self->other_method($arg2);
     }

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.