Select Code to Download

sub WriteLine {
    my $self = shift;
...
        $self->Trace(_CallerStr($it)); 
    return $it;
};

sub <Call> {
    my $self = shift;
...
        $self->Trace(_CallerStr($it));
    return $it;
};