Perl has dynamic scoping (along with lexical scoping).