{   # creates a new lexical scope
    my $foo = "add text here - ";
    sub add_text {
        my $args = join '', @_;
        $foo .= $args;
        return $foo;
    }
}   # $foo now only referenced by &add_text